home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1994 August: Tool Chest / Dev.CD Aug 94.toast / Tool Chest / Development Platforms / Macintosh Common Lisp Related / interfaces / QuickTime™ 1.0 Interfaces / Movies.lisp < prev    next >
Encoding:
Text File  |  1993-09-16  |  65.7 KB  |  1,789 lines  |  [TEXT/CCL2]
  1.  
  2. (in-package :TRAPS)
  3. ; 
  4. ; Created: Wednesday, August 14, 1991 at 12:36 PM
  5. ;  Movies.p
  6. ;  Pascal Interface to the Macintosh Libraries
  7. ; 
  8. ;   Copyright Apple Computer, Inc. 1991
  9. ;   All rights reserved
  10. ; 
  11. ; 
  12.  
  13. ; $IFC UNDEFINED UsingIncludes
  14. ; $SETC UsingIncludes := 0
  15. ; $ENDC
  16.  
  17. ; $IFC NOT UsingIncludes
  18.  
  19. ; $ENDC
  20.  
  21. ; $IFC UNDEFINED UsingMovies
  22. ; $SETC UsingMovies := 1
  23.  
  24. ; $I+
  25. ; $SETC MoviesIncludes := UsingIncludes
  26. ; $SETC UsingIncludes := 1
  27. ; $IFC UNDEFINED UsingQuickDraw
  28.  
  29. (require-interface 'QUICKDRAW)  ; $I $$Shell(PInterfaces)QuickDraw.p
  30. ; $ENDC
  31. ; $IFC UNDEFINED UsingAliases
  32.  
  33. (require-interface 'ALIASES)    ; $I $$Shell(PInterfaces)Aliases.p
  34. ; $ENDC
  35. ; $IFC UNDEFINED UsingEvents
  36.  
  37. (require-interface 'EVENTS)     ; $I $$Shell(PInterfaces)Events.p
  38. ; $ENDC
  39. ; $IFC UNDEFINED UsingComponents
  40.  
  41. (require-interface 'COMPONENTS) ; $I $$Shell(PInterfaces)Components.p
  42. ; $ENDC
  43. ; $IFC UNDEFINED UsingImageCompression
  44.  
  45. (require-interface 'IMAGECOMPRESSION); $I $$Shell(PInterfaces)ImageCompression.p
  46. ; $ENDC
  47. ; $SETC UsingIncludes := MoviesIncludes
  48.  
  49. (defconstant $gestaltQuickTime :|qtim|)
  50.  
  51. (defconstant $MovieFileType :|MooV|)
  52.  
  53. (defconstant $VideoMediaType :|vide|)
  54. (defconstant $SoundMediaType :|soun|)
  55.  
  56. (defconstant $DoTheRightThing 0)
  57.  
  58. (defconstant $kFullVolume #X100);  8.8 format 
  59. (defconstant $kNoVolume 0)
  60.  
  61. (def-mactype :MOVIE (find-mactype :POINTER))
  62. (defrecord MovieRecord 
  63.    (data (:ARRAY :SIGNED-LONG 1))
  64.    )
  65.  
  66. (def-mactype :TRACK (find-mactype :POINTER))
  67. (defrecord TrackRecord 
  68.    (data (:ARRAY :SIGNED-LONG 1))
  69.    )
  70.  
  71. (def-mactype :MEDIA (find-mactype :POINTER))
  72. (defrecord MediaRecord 
  73.    (data (:ARRAY :SIGNED-LONG 1))
  74.    )
  75.  
  76. (def-mactype :USERDATA (find-mactype :POINTER))
  77. (defrecord UserDataRecord 
  78.    (data (:ARRAY :SIGNED-LONG 1))
  79.    )
  80.  
  81. (def-mactype :TRACKEDITSTATE (find-mactype :POINTER))
  82. (defrecord TrackEditStateRecord 
  83.    (data (:ARRAY :SIGNED-LONG 1))
  84.    )
  85.  
  86. (def-mactype :MOVIEEDITSTATE (find-mactype :POINTER))
  87. (defrecord MovieEditStateRecord 
  88.    (data (:ARRAY :SIGNED-LONG 1))
  89.    )
  90.  
  91. (def-mactype :TIMEVALUE (find-mactype :SIGNED-LONG))
  92. (def-mactype :TIMESCALE (find-mactype :SIGNED-LONG))
  93.  
  94. (def-mactype :TIMEBASE (find-mactype :POINTER))
  95. (defrecord TimeBaseRecord 
  96.    (data (:ARRAY :SIGNED-LONG 1))
  97.    )
  98.  
  99. (def-mactype :QTCALLBACK (find-mactype :POINTER))
  100. (defrecord CallBackRecord 
  101.    (data (:ARRAY :SIGNED-LONG 1))
  102.    )
  103.  
  104. (defrecord Int64 
  105.    (hi :SIGNED-LONG)
  106.    (lo :SIGNED-LONG)
  107.    )
  108.  
  109. (defrecord TimeRecord 
  110.    (value :INT64)
  111.    (scale :SIGNED-LONG)
  112.    (base (:POINTER :TIMEBASERECORD))
  113.    )
  114.  
  115. (def-mactype :SAMPLEDESCRIPTIONPTR (find-mactype :POINTER))
  116. (def-mactype :SAMPLEDESCRIPTIONHANDLE (find-mactype :HANDLE))
  117. (defrecord (SampleDescription :handle) 
  118.    (descSize :SIGNED-LONG)
  119.    (dataFormat :SIGNED-LONG)
  120.    )
  121.  
  122. (def-mactype :SOUNDDESCRIPTIONPTR (find-mactype :POINTER))
  123. (def-mactype :SOUNDDESCRIPTIONHANDLE (find-mactype :HANDLE))
  124. (defrecord (SoundDescription :handle) 
  125.    (descSize :SIGNED-LONG)
  126.    (dataFormat :SIGNED-LONG)
  127.    (resvd1 :SIGNED-LONG)
  128.    (resvd2 :SIGNED-INTEGER)
  129.    (dataRefIndex :SIGNED-INTEGER)
  130.    (version :SIGNED-INTEGER)
  131.    (revlevel :SIGNED-INTEGER)
  132.    (vendor :SIGNED-LONG)
  133.    (numChannels :SIGNED-INTEGER)
  134.    (sampleSize :SIGNED-INTEGER)
  135.    (compressionID :SIGNED-INTEGER)
  136.    (packetSize :SIGNED-INTEGER)
  137.    (sampleRate :SIGNED-LONG)
  138.    )
  139.  
  140. ;  progress messages 
  141. (defconstant $movieProgressOpen 0)
  142. (defconstant $movieProgressUpdatePercent 1)
  143. (defconstant $movieProgressClose 2)
  144.  
  145. ;  progress operations 
  146. (defconstant $progressOpFlatten 1)
  147. (defconstant $progressOpInsertTrackSegment 2)
  148. (defconstant $progressOpInsertMovieSegment 3)
  149. (defconstant $progressOpPaste 4)
  150. (defconstant $progressOpAddMovieSelection 5)
  151. (defconstant $progressOpCopy 6)
  152. (defconstant $progressOpCut 7)
  153. (defconstant $progressOpLoadMovieIntoRam 8)
  154. (defconstant $progressOpLoadTrackIntoRam 9)
  155. (defconstant $progressOpLoadMediaIntoRam 10)
  156.  
  157. ;  media quality settings 
  158. (defconstant $mediaQualityDraft #X0)
  159. (defconstant $mediaQualityNormal #X40)
  160. (defconstant $mediaQualityBetter #X80)
  161. (defconstant $mediaQualityBest #XC0)
  162.  
  163. (def-mactype :MOVIEPROGRESSPROCPTR (find-mactype :POINTER))
  164.  
  165. (def-mactype :MOVIERGNCOVERPROC (find-mactype :POINTER))
  166.  
  167. (def-mactype :MEDIAINFORMATIONHANDLE (find-mactype :HANDLE))
  168. (def-mactype :MEDIAHANDLER (find-mactype :POINTER))
  169. (def-mactype :MEDIAHANDLERCOMPONENT (find-mactype :POINTER))
  170. (def-mactype :DATAHANDLER (find-mactype :POINTER))
  171. (def-mactype :DATAHANDLERCOMPONENT (find-mactype :POINTER))
  172. (def-mactype :HANDLERERROR (find-mactype :SIGNED-LONG))
  173. (def-mactype :MOVIECONTROLLER (find-mactype :POINTER))
  174.  
  175. (def-mactype :ERRORPROCPTR (find-mactype :POINTER))
  176. (def-mactype :MOVIEPREVIEWCALLOUTPROC (find-mactype :POINTER))
  177.  
  178. (defconstant $newMovieActive #X1)
  179. (defconstant $newMovieDontResolveDataRefs #X2)
  180. (defconstant $newMovieDontAskUnresolvedDataRefs #X4)
  181.  
  182. (defconstant $trackUsageInMovie #X2)
  183. (defconstant $trackUsageInPreview #X4)
  184. (defconstant $trackUsageInPoster #X8)
  185.  
  186. (defconstant $mediaSampleNotSync 1)
  187.  
  188. (defconstant $nextTimeMediaSample #X1)
  189. (defconstant $nextTimeMediaEdit #X2)
  190. (defconstant $nextTimeTrackEdit #X4)
  191. (defconstant $nextTimeSyncSample #X8)
  192. (defconstant $nextTimeEdgeOK #X2000)
  193. (defconstant $nextTimeIgnoreActiveSegment #X4000)
  194.  
  195. (defconstant $createMovieFileDeleteCurFile #X80000000)
  196. (defconstant $createMovieFileDontCreateMovie #X40000000)
  197. (defconstant $createMovieFileDontOpenFile #X20000000)
  198.  
  199. (defconstant $flattenAddMovieToDataFork #X1)
  200. (defconstant $flattenActiveTracksOnly #X4)
  201. (defconstant $flattenDontInterleaveFlatten #X8)
  202.  
  203. (defconstant $movieScrapDontZeroScrap #X1)
  204. (defconstant $movieScrapOnlyPutMovie #X2)
  205.  
  206. (defconstant $hintsScrubMode #X1)
  207.  
  208. ;   Initialization Routines  
  209.  
  210. (deftrap _ENTERMOVIES NIL
  211.    (:STACK :SIGNED-INTEGER)
  212.    (:STACK-TRAP #xAAAA :D0 1))
  213.  
  214. (deftrap _EXITMOVIES NIL
  215.    NIL
  216.    (:STACK-TRAP #xAAAA :D0 2))
  217.  
  218. ;   error Routines  
  219.  
  220. (deftrap _GETMOVIESERROR NIL
  221.    (:STACK :SIGNED-INTEGER)
  222.    (:STACK-TRAP #xAAAA :D0 3))
  223.  
  224. (deftrap _CLEARMOVIESSTICKYERROR NIL
  225.    NIL
  226.    (:STACK-TRAP #xAAAA :D0 222))
  227.  
  228. (deftrap _GETMOVIESSTICKYERROR NIL
  229.    (:STACK :SIGNED-INTEGER)
  230.    (:STACK-TRAP #xAAAA :D0 4))
  231.  
  232.  
  233. (deftrap _SETMOVIESERRORPROC ((ERRPROC :POINTER) (REFCON :SIGNED-LONG))
  234.    NIL
  235.    (:STACK-TRAP #xAAAA :D0 239 ERRPROC REFCON))
  236.  
  237.  
  238. (deftrap _GETTRACKSTATUS ((T (:POINTER :TRACKRECORD)))
  239.    (:STACK :SIGNED-LONG)
  240.    (:STACK-TRAP #xAAAA :D0 370 T))
  241.  
  242. (deftrap _GETMOVIESTATUS ((M (:POINTER :MOVIERECORD)) (FIRSTPROBLEMTRACK (:POINTER (:POINTER :TRACKRECORD))))
  243.    (:STACK :SIGNED-LONG)
  244.    (:STACK-TRAP #xAAAA :D0 371 M FIRSTPROBLEMTRACK))
  245.  
  246. ;   Playback Routines  
  247.  
  248. (deftrap _MOVIESTASK ((M (:POINTER :MOVIERECORD)) (MAXMILLISECTOUSE :SIGNED-LONG))
  249.    NIL
  250.    (:STACK-TRAP #xAAAA :D0 5 M MAXMILLISECTOUSE))
  251.  
  252.  
  253. (deftrap _STARTMOVIE ((M (:POINTER :MOVIERECORD)))
  254.    NIL
  255.    (:STACK-TRAP #xAAAA :D0 11 M))
  256.  
  257. (deftrap _STOPMOVIE ((M (:POINTER :MOVIERECORD)))
  258.    NIL
  259.    (:STACK-TRAP #xAAAA :D0 12 M))
  260.  
  261. (deftrap _GOTOBEGINNINGOFMOVIE ((M (:POINTER :MOVIERECORD)))
  262.    NIL
  263.    (:STACK-TRAP #xAAAA :D0 13 M))
  264.  
  265. (deftrap _GOTOENDOFMOVIE ((M (:POINTER :MOVIERECORD)))
  266.    NIL
  267.    (:STACK-TRAP #xAAAA :D0 14 M))
  268.  
  269. (deftrap _ISMOVIEDONE ((M (:POINTER :MOVIERECORD)))
  270.    (:STACK :BOOLEAN)
  271.    (:STACK-TRAP #xAAAA :D0 221 M))
  272.  
  273.  
  274. (deftrap _GETMOVIEPREVIEWMODE ((M (:POINTER :MOVIERECORD)))
  275.    (:STACK :BOOLEAN)
  276.    (:STACK-TRAP #xAAAA :D0 15 M))
  277.  
  278. (deftrap _SETMOVIEPREVIEWMODE ((M (:POINTER :MOVIERECORD)) (USEPREVIEW :BOOLEAN))
  279.    NIL
  280.    (:STACK-TRAP #xAAAA :D0 16 M USEPREVIEW))
  281.  
  282. (deftrap _SHOWMOVIEPOSTER ((M (:POINTER :MOVIERECORD)))
  283.    NIL
  284.    (:STACK-TRAP #xAAAA :D0 17 M))
  285.  
  286.  
  287. (deftrap _GETMOVIEGWORLD ((M (:POINTER :MOVIERECORD)) (PORT (:POINTER (:POINTER :CGRAFPORT))) (GDH (:POINTER (:HANDLE :GDEVICE))))
  288.    NIL
  289.    (:STACK-TRAP #xAAAA :D0 21 M PORT GDH))
  290.  
  291. (deftrap _SETMOVIEGWORLD ((M (:POINTER :MOVIERECORD)) (PORT (:POINTER :CGRAFPORT)) (GDH (:HANDLE :GDEVICE)))
  292.    NIL
  293.    (:STACK-TRAP #xAAAA :D0 22 M PORT GDH))
  294.  
  295.  
  296. (deftrap _PREROLLMOVIE ((M (:POINTER :MOVIERECORD)) (TIME :SIGNED-LONG) (RATE :SIGNED-LONG))
  297.    (:STACK :SIGNED-INTEGER)
  298.    (:STACK-TRAP #xAAAA :D0 6 M TIME RATE))
  299.  
  300. (deftrap _LOADMOVIEINTORAM ((M (:POINTER :MOVIERECORD)) (TIME :SIGNED-LONG) (DURATION :SIGNED-LONG) (FLAGS :SIGNED-LONG))
  301.    (:STACK :SIGNED-INTEGER)
  302.    (:STACK-TRAP #xAAAA :D0 7 M TIME DURATION FLAGS))
  303.  
  304. (deftrap _LOADTRACKINTORAM ((T (:POINTER :TRACKRECORD)) (TIME :SIGNED-LONG) (DURATION :SIGNED-LONG) (FLAGS :SIGNED-LONG))
  305.    (:STACK :SIGNED-INTEGER)
  306.    (:STACK-TRAP #xAAAA :D0 366 T TIME DURATION FLAGS))
  307.  
  308. (deftrap _LOADMEDIAINTORAM ((M (:POINTER :MEDIARECORD)) (TIME :SIGNED-LONG) (DURATION :SIGNED-LONG) (FLAGS :SIGNED-LONG))
  309.    (:STACK :SIGNED-INTEGER)
  310.    (:STACK-TRAP #xAAAA :D0 8 M TIME DURATION FLAGS))
  311.  
  312.  
  313. (deftrap _SETMOVIEACTIVE ((M (:POINTER :MOVIERECORD)) (ACTIVE :BOOLEAN))
  314.    NIL
  315.    (:STACK-TRAP #xAAAA :D0 9 M ACTIVE))
  316.  
  317. (deftrap _GETMOVIEACTIVE ((M (:POINTER :MOVIERECORD)))
  318.    (:STACK :BOOLEAN)
  319.    (:STACK-TRAP #xAAAA :D0 10 M))
  320.  
  321.  
  322. (deftrap _PLAYMOVIEPREVIEW ((M (:POINTER :MOVIERECORD)) (CALLOUTPROC :POINTER) (REFCON :SIGNED-LONG))
  323.    NIL
  324.    (:STACK-TRAP #xAAAA :D0 242 M CALLOUTPROC REFCON))
  325.  
  326. ;   Movie PICT Routines  
  327.  
  328. (deftrap _GETMOVIEPICT ((M (:POINTER :MOVIERECORD)) (TIME :SIGNED-LONG))
  329.    (:STACK (:HANDLE :PICTURE))
  330.    (:STACK-TRAP #xAAAA :D0 29 M TIME))
  331.  
  332. (deftrap _GETTRACKPICT ((T (:POINTER :TRACKRECORD)) (TIME :SIGNED-LONG))
  333.    (:STACK (:HANDLE :PICTURE))
  334.    (:STACK-TRAP #xAAAA :D0 30 T TIME))
  335.  
  336.  
  337. (deftrap _GETMOVIEPOSTERPICT ((M (:POINTER :MOVIERECORD)))
  338.    (:STACK (:HANDLE :PICTURE))
  339.    (:STACK-TRAP #xAAAA :D0 247 M))
  340.  
  341. ;   movie TimeBase Routines  
  342.  
  343. (deftrap _GETMOVIETIMEBASE ((M (:POINTER :MOVIERECORD)))
  344.    (:STACK (:POINTER :TIMEBASERECORD))
  345.    (:STACK-TRAP #xAAAA :D0 18 M))
  346.  
  347.  
  348. (deftrap _SETMOVIEMASTERTIMEBASE ((M (:POINTER :MOVIERECORD)) (TB (:POINTER :TIMEBASERECORD)) (SLAVEZERO :TIMERECORD))
  349.    NIL
  350.    (:STACK-TRAP #xAAAA :D0 359 M TB SLAVEZERO))
  351.  
  352. (deftrap _SETMOVIEMASTERCLOCK ((M (:POINTER :MOVIERECORD)) (CLOCKMEISTER (:POINTER :COMPONENTRECORD)) (SLAVEZERO :TIMERECORD))
  353.    NIL
  354.    (:STACK-TRAP #xAAAA :D0 360 M CLOCKMEISTER SLAVEZERO))
  355.  
  356. ;   spatial movie Routines  
  357.  
  358. (deftrap _GETMOVIEBOX ((M (:POINTER :MOVIERECORD)) (BOXRECT (:POINTER :RECT)))
  359.    NIL
  360.    (:STACK-TRAP #xAAAA :D0 249 M BOXRECT))
  361.  
  362. (deftrap _SETMOVIEBOX ((M (:POINTER :MOVIERECORD)) (BOXRECT :RECT))
  363.    NIL
  364.    (:STACK-TRAP #xAAAA :D0 250 M BOXRECT))
  365.  
  366. ;   movie display clip  
  367.  
  368. (deftrap _GETMOVIEDISPLAYCLIPRGN ((M (:POINTER :MOVIERECORD)))
  369.    (:STACK (:HANDLE :REGION))
  370.    (:STACK-TRAP #xAAAA :D0 252 M))
  371.  
  372. (deftrap _SETMOVIEDISPLAYCLIPRGN ((M (:POINTER :MOVIERECORD)) (THECLIP (:HANDLE :REGION)))
  373.    NIL
  374.    (:STACK-TRAP #xAAAA :D0 253 M THECLIP))
  375.  
  376. ;   movie clip  
  377.  
  378. (deftrap _GETMOVIECLIPRGN ((M (:POINTER :MOVIERECORD)))
  379.    (:STACK (:HANDLE :REGION))
  380.    (:STACK-TRAP #xAAAA :D0 256 M))
  381.  
  382. (deftrap _SETMOVIECLIPRGN ((M (:POINTER :MOVIERECORD)) (THECLIP (:HANDLE :REGION)))
  383.    NIL
  384.    (:STACK-TRAP #xAAAA :D0 257 M THECLIP))
  385.  
  386. ;   track clip  
  387.  
  388. (deftrap _GETTRACKCLIPRGN ((T (:POINTER :TRACKRECORD)))
  389.    (:STACK (:HANDLE :REGION))
  390.    (:STACK-TRAP #xAAAA :D0 258 T))
  391.  
  392. (deftrap _SETTRACKCLIPRGN ((T (:POINTER :TRACKRECORD)) (THECLIP (:HANDLE :REGION)))
  393.    NIL
  394.    (:STACK-TRAP #xAAAA :D0 259 T THECLIP))
  395.  
  396. ;   bounds in display space  
  397.  
  398. (deftrap _GETMOVIEDISPLAYBOUNDSRGN ((M (:POINTER :MOVIERECORD)))
  399.    (:STACK (:HANDLE :REGION))
  400.    (:STACK-TRAP #xAAAA :D0 251 M))
  401.  
  402. (deftrap _GETTRACKDISPLAYBOUNDSRGN ((T (:POINTER :TRACKRECORD)))
  403.    (:STACK (:HANDLE :REGION))
  404.    (:STACK-TRAP #xAAAA :D0 274 T))
  405.  
  406. ;   bounds in movie space  
  407.  
  408. (deftrap _GETMOVIEBOUNDSRGN ((M (:POINTER :MOVIERECORD)))
  409.    (:STACK (:HANDLE :REGION))
  410.    (:STACK-TRAP #xAAAA :D0 254 M))
  411.  
  412. (deftrap _GETTRACKMOVIEBOUNDSRGN ((T (:POINTER :TRACKRECORD)))
  413.    (:STACK (:HANDLE :REGION))
  414.    (:STACK-TRAP #xAAAA :D0 255 T))
  415.  
  416. ;   bounds in track space  
  417.  
  418. (deftrap _GETTRACKBOUNDSRGN ((T (:POINTER :TRACKRECORD)))
  419.    (:STACK (:HANDLE :REGION))
  420.    (:STACK-TRAP #xAAAA :D0 273 T))
  421.  
  422. ;   movie poster box  
  423.  
  424. (deftrap _GETPOSTERBOX ((M (:POINTER :MOVIERECORD)) (BOXRECT (:POINTER :RECT)))
  425.    NIL
  426.    (:STACK-TRAP #xAAAA :D0 367 M BOXRECT))
  427.  
  428. (deftrap _SETPOSTERBOX ((M (:POINTER :MOVIERECORD)) (BOXRECT :RECT))
  429.    NIL
  430.    (:STACK-TRAP #xAAAA :D0 368 M BOXRECT))
  431.  
  432. ;   movie/track bounds over a range of time  
  433.  
  434. (deftrap _GETMOVIESEGMENTDISPLAYBOUNDSRGN ((M (:POINTER :MOVIERECORD)) (TIME :SIGNED-LONG) (DURATION :SIGNED-LONG))
  435.    (:STACK (:HANDLE :REGION))
  436.    (:STACK-TRAP #xAAAA :D0 364 M TIME DURATION))
  437.  
  438. (deftrap _GETTRACKSEGMENTDISPLAYBOUNDSRGN ((T (:POINTER :TRACKRECORD)) (TIME :SIGNED-LONG) (DURATION :SIGNED-LONG))
  439.    (:STACK (:HANDLE :REGION))
  440.    (:STACK-TRAP #xAAAA :D0 363 T TIME DURATION))
  441.  
  442.  
  443. (deftrap _SETMOVIECOVERPROCS ((M (:POINTER :MOVIERECORD)) (UNCOVERPROC :POINTER) (COVERPROC :POINTER) (REFCON :SIGNED-LONG))
  444.    NIL
  445.    (:STACK-TRAP #xAAAA :D0 377 M UNCOVERPROC COVERPROC REFCON))
  446.  
  447. ;   mattes - always in track space  
  448.  
  449. (deftrap _GETTRACKMATTE ((T (:POINTER :TRACKRECORD)))
  450.    (:STACK (:HANDLE :PIXMAP))
  451.    (:STACK-TRAP #xAAAA :D0 277 T))
  452.  
  453. (deftrap _SETTRACKMATTE ((T (:POINTER :TRACKRECORD)) (THEMATTE (:HANDLE :PIXMAP)))
  454.    NIL
  455.    (:STACK-TRAP #xAAAA :D0 278 T THEMATTE))
  456.  
  457. (deftrap _DISPOSEMATTE ((THEMATTE (:HANDLE :PIXMAP)))
  458.    NIL
  459.    (:STACK-TRAP #xAAAA :D0 330 THEMATTE))
  460.  
  461. ;   movie creation Routines  
  462.  
  463. (deftrap _NEWMOVIEFROMHANDLE ((M (:POINTER (:POINTER :MOVIERECORD))) (H :HANDLE) (NEWMOVIEFLAGS :SIGNED-INTEGER) (DATAREFWASCHANGED (:POINTER :BOOLEAN)))
  464.    (:STACK :SIGNED-INTEGER)
  465.    (:STACK-TRAP #xAAAA :D0 241 M H NEWMOVIEFLAGS DATAREFWASCHANGED))
  466.  
  467. (deftrap _PUTMOVIEINTOHANDLE ((M (:POINTER :MOVIERECORD)) (H :HANDLE))
  468.    (:STACK :SIGNED-INTEGER)
  469.    (:STACK-TRAP #xAAAA :D0 34 M H))
  470.  
  471.  
  472. (deftrap _NEWMOVIE ((NEWMOVIEFLAGS :SIGNED-LONG))
  473.    (:STACK (:POINTER :MOVIERECORD))
  474.    (:STACK-TRAP #xAAAA :D0 391 NEWMOVIEFLAGS))
  475.  
  476. (deftrap _DISPOSEMOVIE ((M (:POINTER :MOVIERECORD)))
  477.    NIL
  478.    (:STACK-TRAP #xAAAA :D0 35 M))
  479.  
  480. ;   Movie Routines  
  481.  
  482. (deftrap _GETMOVIECREATIONTIME ((M (:POINTER :MOVIERECORD)))
  483.    (:STACK :SIGNED-LONG)
  484.    (:STACK-TRAP #xAAAA :D0 38 M))
  485.  
  486. (deftrap _GETMOVIEMODIFICATIONTIME ((M (:POINTER :MOVIERECORD)))
  487.    (:STACK :SIGNED-LONG)
  488.    (:STACK-TRAP #xAAAA :D0 39 M))
  489.  
  490.  
  491. (deftrap _GETMOVIETIMESCALE ((M (:POINTER :MOVIERECORD)))
  492.    (:STACK :SIGNED-LONG)
  493.    (:STACK-TRAP #xAAAA :D0 41 M))
  494.  
  495. (deftrap _SETMOVIETIMESCALE ((M (:POINTER :MOVIERECORD)) (TIMESCALE :SIGNED-LONG))
  496.    NIL
  497.    (:STACK-TRAP #xAAAA :D0 42 M TIMESCALE))
  498.  
  499.  
  500. (deftrap _GETMOVIEDURATION ((M (:POINTER :MOVIERECORD)))
  501.    (:STACK :SIGNED-LONG)
  502.    (:STACK-TRAP #xAAAA :D0 43 M))
  503.  
  504.  
  505. (deftrap _GETMOVIERATE ((M (:POINTER :MOVIERECORD)))
  506.    (:STACK :SIGNED-LONG)
  507.    (:STACK-TRAP #xAAAA :D0 44 M))
  508.  
  509. (deftrap _SETMOVIERATE ((M (:POINTER :MOVIERECORD)) (RATE :SIGNED-LONG))
  510.    NIL
  511.    (:STACK-TRAP #xAAAA :D0 45 M RATE))
  512.  
  513.  
  514. (deftrap _GETMOVIEPREFERREDRATE ((M (:POINTER :MOVIERECORD)))
  515.    (:STACK :SIGNED-LONG)
  516.    (:STACK-TRAP #xAAAA :D0 243 M))
  517.  
  518. (deftrap _SETMOVIEPREFERREDRATE ((M (:POINTER :MOVIERECORD)) (RATE :SIGNED-LONG))
  519.    NIL
  520.    (:STACK-TRAP #xAAAA :D0 244 M RATE))
  521.  
  522.  
  523. (deftrap _GETMOVIEPREFERREDVOLUME ((M (:POINTER :MOVIERECORD)))
  524.    (:STACK :SIGNED-INTEGER)
  525.    (:STACK-TRAP #xAAAA :D0 245 M))
  526.  
  527. (deftrap _SETMOVIEPREFERREDVOLUME ((M (:POINTER :MOVIERECORD)) (VOLUME :SIGNED-INTEGER))
  528.    NIL
  529.    (:STACK-TRAP #xAAAA :D0 246 M VOLUME))
  530.  
  531.  
  532. (deftrap _GETMOVIEVOLUME ((M (:POINTER :MOVIERECORD)))
  533.    (:STACK :SIGNED-INTEGER)
  534.    (:STACK-TRAP #xAAAA :D0 46 M))
  535.  
  536. (deftrap _SETMOVIEVOLUME ((M (:POINTER :MOVIERECORD)) (VOLUME :SIGNED-INTEGER))
  537.    NIL
  538.    (:STACK-TRAP #xAAAA :D0 47 M VOLUME))
  539.  
  540.  
  541. (deftrap _GETMOVIEMATRIX ((M (:POINTER :MOVIERECORD)) (MATRIX (:POINTER :MATRIXRECORD)))
  542.    NIL
  543.    (:STACK-TRAP #xAAAA :D0 49 M MATRIX))
  544.  
  545. (deftrap _SETMOVIEMATRIX ((M (:POINTER :MOVIERECORD)) (MATRIX :MATRIXRECORD))
  546.    NIL
  547.    (:STACK-TRAP #xAAAA :D0 50 M MATRIX))
  548.  
  549.  
  550. (deftrap _GETMOVIEPREVIEWTIME ((M (:POINTER :MOVIERECORD)) (PREVIEWTIME (:POINTER :SIGNED-LONG)) (PREVIEWDURATION (:POINTER :SIGNED-LONG)))
  551.    NIL
  552.    (:STACK-TRAP #xAAAA :D0 51 M PREVIEWTIME PREVIEWDURATION))
  553.  
  554. (deftrap _SETMOVIEPREVIEWTIME ((M (:POINTER :MOVIERECORD)) (PREVIEWTIME :SIGNED-LONG) (PREVIEWDURATION :SIGNED-LONG))
  555.    NIL
  556.    (:STACK-TRAP #xAAAA :D0 52 M PREVIEWTIME PREVIEWDURATION))
  557.  
  558.  
  559. (deftrap _GETMOVIEPOSTERTIME ((M (:POINTER :MOVIERECORD)))
  560.    (:STACK :SIGNED-LONG)
  561.    (:STACK-TRAP #xAAAA :D0 53 M))
  562.  
  563. (deftrap _SETMOVIEPOSTERTIME ((M (:POINTER :MOVIERECORD)) (POSTERTIME :SIGNED-LONG))
  564.    NIL
  565.    (:STACK-TRAP #xAAAA :D0 54 M POSTERTIME))
  566.  
  567.  
  568. (deftrap _GETMOVIESELECTION ((M (:POINTER :MOVIERECORD)) (SELECTIONTIME (:POINTER :SIGNED-LONG)) (SELECTIONDURATION (:POINTER :SIGNED-LONG)))
  569.    NIL
  570.    (:STACK-TRAP #xAAAA :D0 55 M SELECTIONTIME SELECTIONDURATION))
  571.  
  572. (deftrap _SETMOVIESELECTION ((M (:POINTER :MOVIERECORD)) (SELECTIONTIME :SIGNED-LONG) (SELECTIONDURATION :SIGNED-LONG))
  573.    NIL
  574.    (:STACK-TRAP #xAAAA :D0 56 M SELECTIONTIME SELECTIONDURATION))
  575.  
  576.  
  577. (deftrap _SETMOVIEACTIVESEGMENT ((M (:POINTER :MOVIERECORD)) (STARTTIME :SIGNED-LONG) (DURATION :SIGNED-LONG))
  578.    NIL
  579.    (:STACK-TRAP #xAAAA :D0 348 M STARTTIME DURATION))
  580.  
  581. (deftrap _GETMOVIEACTIVESEGMENT ((M (:POINTER :MOVIERECORD)) (STARTTIME (:POINTER :SIGNED-LONG)) (DURATION (:POINTER :SIGNED-LONG)))
  582.    NIL
  583.    (:STACK-TRAP #xAAAA :D0 349 M STARTTIME DURATION))
  584.  
  585.  
  586. (deftrap _GETMOVIETIME ((M (:POINTER :MOVIERECORD)) (CURRENTTIME (:POINTER :TIMERECORD)))
  587.    (:STACK :SIGNED-LONG)
  588.    (:STACK-TRAP #xAAAA :D0 57 M CURRENTTIME))
  589.  
  590. (deftrap _SETMOVIETIME ((M (:POINTER :MOVIERECORD)) (NEWTIME :TIMERECORD))
  591.    NIL
  592.    (:STACK-TRAP #xAAAA :D0 60 M NEWTIME))
  593.  
  594. (deftrap _SETMOVIETIMEVALUE ((M (:POINTER :MOVIERECORD)) (NEWTIME :SIGNED-LONG))
  595.    NIL
  596.    (:STACK-TRAP #xAAAA :D0 61 M NEWTIME))
  597.  
  598.  
  599. (deftrap _GETMOVIEUSERDATA ((M (:POINTER :MOVIERECORD)))
  600.    (:STACK (:POINTER :USERDATARECORD))
  601.    (:STACK-TRAP #xAAAA :D0 62 M))
  602.  
  603.  
  604. (deftrap _SETMOVIEPLAYHINTS ((MOVIE (:POINTER :MOVIERECORD)) (FLAGS :SIGNED-LONG) (FLAGSMASK :SIGNED-LONG))
  605.    NIL
  606.    (:STACK-TRAP #xAAAA :D0 417 MOVIE FLAGS FLAGSMASK))
  607.  
  608. ;   Movie/Track/Media finding Routines  
  609.  
  610. (deftrap _GETMOVIETRACKCOUNT ((M (:POINTER :MOVIERECORD)))
  611.    (:STACK :SIGNED-LONG)
  612.    (:STACK-TRAP #xAAAA :D0 63 M))
  613.  
  614. (deftrap _GETMOVIETRACK ((M (:POINTER :MOVIERECORD)) (TRACKID :SIGNED-LONG))
  615.    (:STACK (:POINTER :TRACKRECORD))
  616.    (:STACK-TRAP #xAAAA :D0 64 M TRACKID))
  617.  
  618.  
  619. (deftrap _GETMOVIEINDTRACK ((M (:POINTER :MOVIERECORD)) (INDEX :SIGNED-LONG))
  620.    (:STACK (:POINTER :TRACKRECORD))
  621.    (:STACK-TRAP #xAAAA :D0 279 M INDEX))
  622.  
  623.  
  624. (deftrap _GETTRACKID ((T (:POINTER :TRACKRECORD)))
  625.    (:STACK :SIGNED-LONG)
  626.    (:STACK-TRAP #xAAAA :D0 295 T))
  627.  
  628.  
  629. (deftrap _GETTRACKMOVIE ((T (:POINTER :TRACKRECORD)))
  630.    (:STACK (:POINTER :MOVIERECORD))
  631.    (:STACK-TRAP #xAAAA :D0 208 T))
  632.  
  633.  
  634. (deftrap _GETTRACKMEDIA ((T (:POINTER :TRACKRECORD)))
  635.    (:STACK (:POINTER :MEDIARECORD))
  636.    (:STACK-TRAP #xAAAA :D0 98 T))
  637.  
  638. (deftrap _GETMEDIATRACK ((M (:POINTER :MEDIARECORD)))
  639.    (:STACK (:POINTER :TRACKRECORD))
  640.    (:STACK-TRAP #xAAAA :D0 197 M))
  641.  
  642. ;   Track creation Routines  
  643.  
  644. (deftrap _NEWMOVIETRACK ((M (:POINTER :MOVIERECORD)) (WIDTH :SIGNED-LONG) (HEIGHT :SIGNED-LONG) (TRACKVOLUME :SIGNED-INTEGER))
  645.    (:STACK (:POINTER :TRACKRECORD))
  646.    (:STACK-TRAP #xAAAA :D0 392 M WIDTH HEIGHT TRACKVOLUME))
  647.  
  648. (deftrap _DISPOSEMOVIETRACK ((T (:POINTER :TRACKRECORD)))
  649.    NIL
  650.    (:STACK-TRAP #xAAAA :D0 66 T))
  651.  
  652. ;   Track Routines  
  653.  
  654. (deftrap _GETTRACKCREATIONTIME ((T (:POINTER :TRACKRECORD)))
  655.    (:STACK :SIGNED-LONG)
  656.    (:STACK-TRAP #xAAAA :D0 67 T))
  657.  
  658. (deftrap _GETTRACKMODIFICATIONTIME ((T (:POINTER :TRACKRECORD)))
  659.    (:STACK :SIGNED-LONG)
  660.    (:STACK-TRAP #xAAAA :D0 68 T))
  661.  
  662.  
  663. (deftrap _GETTRACKENABLED ((T (:POINTER :TRACKRECORD)))
  664.    (:STACK :BOOLEAN)
  665.    (:STACK-TRAP #xAAAA :D0 69 T))
  666.  
  667. (deftrap _SETTRACKENABLED ((T (:POINTER :TRACKRECORD)) (ISENABLED :BOOLEAN))
  668.    NIL
  669.    (:STACK-TRAP #xAAAA :D0 70 T ISENABLED))
  670.  
  671.  
  672. (deftrap _GETTRACKUSAGE ((T (:POINTER :TRACKRECORD)))
  673.    (:STACK :SIGNED-LONG)
  674.    (:STACK-TRAP #xAAAA :D0 71 T))
  675.  
  676. (deftrap _SETTRACKUSAGE ((T (:POINTER :TRACKRECORD)) (USAGE :SIGNED-LONG))
  677.    NIL
  678.    (:STACK-TRAP #xAAAA :D0 72 T USAGE))
  679.  
  680.  
  681. (deftrap _GETTRACKDURATION ((T (:POINTER :TRACKRECORD)))
  682.    (:STACK :SIGNED-LONG)
  683.    (:STACK-TRAP #xAAAA :D0 75 T))
  684.  
  685.  
  686. (deftrap _GETTRACKOFFSET ((T (:POINTER :TRACKRECORD)))
  687.    (:STACK :SIGNED-LONG)
  688.    (:STACK-TRAP #xAAAA :D0 76 T))
  689.  
  690. (deftrap _SETTRACKOFFSET ((T (:POINTER :TRACKRECORD)) (OFFSET :SIGNED-LONG))
  691.    NIL
  692.    (:STACK-TRAP #xAAAA :D0 77 T OFFSET))
  693.  
  694.  
  695. (deftrap _GETTRACKLAYER ((T (:POINTER :TRACKRECORD)))
  696.    (:STACK :SIGNED-INTEGER)
  697.    (:STACK-TRAP #xAAAA :D0 80 T))
  698.  
  699. (deftrap _SETTRACKLAYER ((T (:POINTER :TRACKRECORD)) (LAYER :SIGNED-INTEGER))
  700.    NIL
  701.    (:STACK-TRAP #xAAAA :D0 81 T LAYER))
  702.  
  703.  
  704. (deftrap _GETTRACKALTERNATE ((T (:POINTER :TRACKRECORD)))
  705.    (:STACK (:POINTER :TRACKRECORD))
  706.    (:STACK-TRAP #xAAAA :D0 82 T))
  707.  
  708. (deftrap _SETTRACKALTERNATE ((T (:POINTER :TRACKRECORD)) (ALTERNATET (:POINTER :TRACKRECORD)))
  709.    NIL
  710.    (:STACK-TRAP #xAAAA :D0 83 T ALTERNATET))
  711.  
  712.  
  713. (deftrap _GETTRACKVOLUME ((T (:POINTER :TRACKRECORD)))
  714.    (:STACK :SIGNED-INTEGER)
  715.    (:STACK-TRAP #xAAAA :D0 84 T))
  716.  
  717. (deftrap _SETTRACKVOLUME ((T (:POINTER :TRACKRECORD)) (VOLUME :SIGNED-INTEGER))
  718.    NIL
  719.    (:STACK-TRAP #xAAAA :D0 85 T VOLUME))
  720.  
  721.  
  722. (deftrap _GETTRACKMATRIX ((T (:POINTER :TRACKRECORD)) (MATRIX (:POINTER :MATRIXRECORD)))
  723.    NIL
  724.    (:STACK-TRAP #xAAAA :D0 86 T MATRIX))
  725.  
  726. (deftrap _SETTRACKMATRIX ((T (:POINTER :TRACKRECORD)) (MATRIX :MATRIXRECORD))
  727.    NIL
  728.    (:STACK-TRAP #xAAAA :D0 87 T MATRIX))
  729.  
  730.  
  731. (deftrap _GETTRACKDIMENSIONS ((T (:POINTER :TRACKRECORD)) (WIDTH (:POINTER :SIGNED-LONG)) (HEIGHT (:POINTER :SIGNED-LONG)))
  732.    NIL
  733.    (:STACK-TRAP #xAAAA :D0 93 T WIDTH HEIGHT))
  734.  
  735. (deftrap _SETTRACKDIMENSIONS ((T (:POINTER :TRACKRECORD)) (WIDTH :SIGNED-LONG) (HEIGHT :SIGNED-LONG))
  736.    NIL
  737.    (:STACK-TRAP #xAAAA :D0 94 T WIDTH HEIGHT))
  738.  
  739.  
  740. (deftrap _GETTRACKUSERDATA ((T (:POINTER :TRACKRECORD)))
  741.    (:STACK (:POINTER :USERDATARECORD))
  742.    (:STACK-TRAP #xAAAA :D0 95 T))
  743.  
  744. ;   Media creation Routines  
  745.  
  746. (deftrap _NEWTRACKMEDIA ((T (:POINTER :TRACKRECORD)) (MEDIATYPE :OSTYPE) (TIMESCALE :SIGNED-LONG) (DATAREF :HANDLE) (DATAREFTYPE :OSTYPE))
  747.    (:STACK (:POINTER :MEDIARECORD))
  748.    (:STACK-TRAP #xAAAA :D0 398 T MEDIATYPE TIMESCALE DATAREF DATAREFTYPE))
  749.  
  750. (deftrap _DISPOSETRACKMEDIA ((M (:POINTER :MEDIARECORD)))
  751.    NIL
  752.    (:STACK-TRAP #xAAAA :D0 97 M))
  753.  
  754. ;   Media Routines  
  755.  
  756. (deftrap _GETMEDIACREATIONTIME ((M (:POINTER :MEDIARECORD)))
  757.    (:STACK :SIGNED-LONG)
  758.    (:STACK-TRAP #xAAAA :D0 102 M))
  759.  
  760. (deftrap _GETMEDIAMODIFICATIONTIME ((M (:POINTER :MEDIARECORD)))
  761.    (:STACK :SIGNED-LONG)
  762.    (:STACK-TRAP #xAAAA :D0 103 M))
  763.  
  764.  
  765. (deftrap _GETMEDIATIMESCALE ((M (:POINTER :MEDIARECORD)))
  766.    (:STACK :SIGNED-LONG)
  767.    (:STACK-TRAP #xAAAA :D0 104 M))
  768.  
  769. (deftrap _SETMEDIATIMESCALE ((M (:POINTER :MEDIARECORD)) (TIMESCALE :SIGNED-LONG))
  770.    NIL
  771.    (:STACK-TRAP #xAAAA :D0 105 M TIMESCALE))
  772.  
  773.  
  774. (deftrap _GETMEDIADURATION ((M (:POINTER :MEDIARECORD)))
  775.    (:STACK :SIGNED-LONG)
  776.    (:STACK-TRAP #xAAAA :D0 106 M))
  777.  
  778.  
  779. (deftrap _GETMEDIALANGUAGE ((M (:POINTER :MEDIARECORD)))
  780.    (:STACK :SIGNED-INTEGER)
  781.    (:STACK-TRAP #xAAAA :D0 107 M))
  782.  
  783. (deftrap _SETMEDIALANGUAGE ((M (:POINTER :MEDIARECORD)) (LANGUAGE :SIGNED-INTEGER))
  784.    NIL
  785.    (:STACK-TRAP #xAAAA :D0 108 M LANGUAGE))
  786.  
  787.  
  788. (deftrap _GETMEDIAQUALITY ((M (:POINTER :MEDIARECORD)))
  789.    (:STACK :SIGNED-INTEGER)
  790.    (:STACK-TRAP #xAAAA :D0 109 M))
  791.  
  792. (deftrap _SETMEDIAQUALITY ((M (:POINTER :MEDIARECORD)) (QUALITY :SIGNED-INTEGER))
  793.    NIL
  794.    (:STACK-TRAP #xAAAA :D0 110 M QUALITY))
  795.  
  796.  
  797. (deftrap _GETMEDIAUSERDATA ((M (:POINTER :MEDIARECORD)))
  798.    (:STACK (:POINTER :USERDATARECORD))
  799.    (:STACK-TRAP #xAAAA :D0 112 M))
  800.  
  801.  
  802. (deftrap _SETMEDIAPLAYHINTS ((MOVIE (:POINTER :MOVIERECORD)) (FLAGS :SIGNED-LONG) (FLAGSMASK :SIGNED-LONG))
  803.    NIL
  804.    (:STACK-TRAP #xAAAA :D0 418 MOVIE FLAGS FLAGSMASK))
  805.  
  806. ;   Media Handler Routines  
  807.  
  808. (deftrap _GETMEDIAHANDLER ((M (:POINTER :MEDIARECORD)))
  809.    (:STACK (:POINTER :COMPONENTINSTANCERECORD))
  810.    (:STACK-TRAP #xAAAA :D0 113 M))
  811.  
  812. (deftrap _SETMEDIAHANDLER ((M (:POINTER :MEDIARECORD)) (MH (:POINTER :COMPONENTRECORD)))
  813.    (:STACK :SIGNED-INTEGER)
  814.    (:STACK-TRAP #xAAAA :D0 400 M MH))
  815.  
  816.  
  817. (deftrap _GETMEDIAHANDLERDESCRIPTION ((M (:POINTER :MEDIARECORD)) (MEDIATYPE (:POINTER :OSTYPE)) (CREATORNAME (:POINTER (:STRING 255))) (CREATORMANUFACTURER (:POINTER :OSTYPE)))
  818.    NIL
  819.    (:STACK-TRAP #xAAAA :D0 111 M MEDIATYPE CREATORNAME CREATORMANUFACTURER))
  820.  
  821. (defconstant $dataRefSelfReference 1)
  822. (defconstant $dataRefWasNotResolved 2)
  823.  
  824. ;   Media dataRef Routines  
  825.  
  826. (deftrap _GETMEDIADATAREF ((M (:POINTER :MEDIARECORD)) (INDEX :SIGNED-INTEGER) (DATAREF (:POINTER :HANDLE)) (DATAREFTYPE (:POINTER :OSTYPE)) (DATAREFATTRIBUTES (:POINTER :SIGNED-LONG)))
  827.    (:STACK :SIGNED-INTEGER)
  828.    (:STACK-TRAP #xAAAA :D0 407 M INDEX DATAREF DATAREFTYPE DATAREFATTRIBUTES))
  829.  
  830. (deftrap _ADDMEDIADATAREF ((M (:POINTER :MEDIARECORD)) (INDEX (:POINTER :SIGNED-INTEGER)) (DATAREF :HANDLE) (DATAREFTYPE :OSTYPE))
  831.    (:STACK :SIGNED-INTEGER)
  832.    (:STACK-TRAP #xAAAA :D0 408 M INDEX DATAREF DATAREFTYPE))
  833.  
  834.  
  835. (deftrap _GETMEDIADATAREFCOUNT ((M (:POINTER :MEDIARECORD)) (COUNT (:POINTER :SIGNED-INTEGER)))
  836.    (:STACK :SIGNED-INTEGER)
  837.    (:STACK-TRAP #xAAAA :D0 409 M COUNT))
  838.  
  839. ;   Media data handler Routines  
  840.  
  841. (deftrap _GETMEDIADATAHANDLER ((M (:POINTER :MEDIARECORD)) (INDEX :SIGNED-INTEGER))
  842.    (:STACK (:POINTER :COMPONENTINSTANCERECORD))
  843.    (:STACK-TRAP #xAAAA :D0 415 M INDEX))
  844.  
  845. (deftrap _SETMEDIADATAHANDLER ((M (:POINTER :MEDIARECORD)) (INDEX :SIGNED-INTEGER) (DATAHANDLER (:POINTER :COMPONENTRECORD)))
  846.    (:STACK :SIGNED-INTEGER)
  847.    (:STACK-TRAP #xAAAA :D0 416 M INDEX DATAHANDLER))
  848.  
  849.  
  850. (deftrap _GETMEDIADATAHANDLERDESCRIPTION ((M (:POINTER :MEDIARECORD)) (INDEX :SIGNED-INTEGER) (DHTYPE (:POINTER :OSTYPE)) (CREATORNAME (:POINTER (:STRING 255))) (CREATORMANUFACTURER (:POINTER :OSTYPE)))
  851.    NIL
  852.    (:STACK-TRAP #xAAAA :D0 414 M INDEX DHTYPE CREATORNAME CREATORMANUFACTURER))
  853.  
  854. ;   Media sample Routines  
  855.  
  856. (deftrap _GETMEDIASAMPLEDESCRIPTIONCOUNT ((M (:POINTER :MEDIARECORD)))
  857.    (:STACK :SIGNED-LONG)
  858.    (:STACK-TRAP #xAAAA :D0 119 M))
  859.  
  860. (deftrap _GETMEDIASAMPLEDESCRIPTION ((M (:POINTER :MEDIARECORD)) (INDEX :SIGNED-LONG) (DESCH (:HANDLE :SAMPLEDESCRIPTION)))
  861.    NIL
  862.    (:STACK-TRAP #xAAAA :D0 120 M INDEX DESCH))
  863.  
  864. (deftrap _GETMEDIASAMPLECOUNT ((M (:POINTER :MEDIARECORD)))
  865.    (:STACK :SIGNED-LONG)
  866.    (:STACK-TRAP #xAAAA :D0 121 M))
  867.  
  868. (deftrap _SAMPLENUMTOMEDIATIME ((M (:POINTER :MEDIARECORD)) (LOGICALSAMPLENUM :SIGNED-LONG) (SAMPLETIME (:POINTER :SIGNED-LONG)) (SAMPLEDURATION (:POINTER :SIGNED-LONG)))
  869.    NIL
  870.    (:STACK-TRAP #xAAAA :D0 122 M LOGICALSAMPLENUM SAMPLETIME SAMPLEDURATION))
  871.  
  872. (deftrap _MEDIATIMETOSAMPLENUM ((M (:POINTER :MEDIARECORD)) (TIME :SIGNED-LONG) (SAMPLENUM (:POINTER :SIGNED-LONG)) (SAMPLETIME (:POINTER :SIGNED-LONG)) (SAMPLEDURATION (:POINTER :SIGNED-LONG)))
  873.    NIL
  874.    (:STACK-TRAP #xAAAA :D0 123 M TIME SAMPLENUM SAMPLETIME SAMPLEDURATION))
  875.  
  876.  
  877. (deftrap _ADDMEDIASAMPLE ((M (:POINTER :MEDIARECORD)) (DATAIN :HANDLE) (INOFFSET :SIGNED-LONG) (SIZE :SIGNED-LONG) (DURATIONPERSAMPLE :SIGNED-LONG) (SAMPLEDESCRIPTIONH (:HANDLE :SAMPLEDESCRIPTION)) (NUMBEROFSAMPLES :SIGNED-LONG) (SAMPLEFLAGS :SIGNED-INTEGER) (SAMPLETIME (:POINTER :SIGNED-LONG)))
  878.    (:STACK :SIGNED-INTEGER)
  879.    (:STACK-TRAP #xAAAA :D0 124 M DATAIN INOFFSET SIZE DURATIONPERSAMPLE SAMPLEDESCRIPTIONH NUMBEROFSAMPLES SAMPLEFLAGS SAMPLETIME))
  880.  
  881. (deftrap _ADDMEDIASAMPLEREFERENCE ((M (:POINTER :MEDIARECORD)) (DATAOFFSET :SIGNED-LONG) (SIZE :SIGNED-LONG) (DURATIONPERSAMPLE :SIGNED-LONG) (SAMPLEDESCRIPTIONH (:HANDLE :SAMPLEDESCRIPTION)) (NUMBEROFSAMPLES :SIGNED-LONG) (SAMPLEFLAGS :SIGNED-INTEGER) (SAMPLETIME (:POINTER :SIGNED-LONG)))
  882.    (:STACK :SIGNED-INTEGER)
  883.    (:STACK-TRAP #xAAAA :D0 125 M DATAOFFSET SIZE DURATIONPERSAMPLE SAMPLEDESCRIPTIONH NUMBEROFSAMPLES SAMPLEFLAGS SAMPLETIME))
  884.  
  885. (deftrap _GETMEDIASAMPLE ((M (:POINTER :MEDIARECORD)) (DATAOUT :HANDLE) (MAXSIZETOGROW :SIGNED-LONG) (SIZE (:POINTER :SIGNED-LONG)) (TIME :SIGNED-LONG) (SAMPLETIME (:POINTER :SIGNED-LONG)) (DURATIONPERSAMPLE (:POINTER :SIGNED-LONG)) (SAMPLEDESCRIPTIONH (:HANDLE :SAMPLEDESCRIPTION)) (SAMPLEDESCRIPTIONINDEX (:POINTER :SIGNED-LONG)) (MAXNUMBEROFSAMPLES :SIGNED-LONG) (NUMBEROFSAMPLES (:POINTER :SIGNED-LONG)) (SAMPLEFLAGS (:POINTER :SIGNED-INTEGER)))
  886.    (:STACK :SIGNED-INTEGER)
  887.    (:STACK-TRAP #xAAAA :D0 126 M DATAOUT MAXSIZETOGROW SIZE TIME SAMPLETIME DURATIONPERSAMPLE SAMPLEDESCRIPTIONH SAMPLEDESCRIPTIONINDEX MAXNUMBEROFSAMPLES NUMBEROFSAMPLES SAMPLEFLAGS))
  888.  
  889. (deftrap _GETMEDIASAMPLEREFERENCE ((M (:POINTER :MEDIARECORD)) (DATAOFFSET (:POINTER :SIGNED-LONG)) (SIZE (:POINTER :SIGNED-LONG)) (TIME :SIGNED-LONG) (SAMPLETIME (:POINTER :SIGNED-LONG)) (DURATIONPERSAMPLE (:POINTER :SIGNED-LONG)) (SAMPLEDESCRIPTIONH (:HANDLE :SAMPLEDESCRIPTION)) (SAMPLEDESCRIPTIONINDEX (:POINTER :SIGNED-LONG)) (MAXNUMBEROFSAMPLES :SIGNED-LONG) (NUMBEROFSAMPLES (:POINTER :SIGNED-LONG)) (SAMPLEFLAGS (:POINTER :SIGNED-INTEGER)))
  890.    (:STACK :SIGNED-INTEGER)
  891.    (:STACK-TRAP #xAAAA :D0 127 M DATAOFFSET SIZE TIME SAMPLETIME DURATIONPERSAMPLE SAMPLEDESCRIPTIONH SAMPLEDESCRIPTIONINDEX MAXNUMBEROFSAMPLES NUMBEROFSAMPLES SAMPLEFLAGS))
  892.  
  893. ;   High level editing Routines  
  894.  
  895. (deftrap _CUTMOVIESELECTION ((M (:POINTER :MOVIERECORD)))
  896.    (:STACK (:POINTER :MOVIERECORD))
  897.    (:STACK-TRAP #xAAAA :D0 141 M))
  898.  
  899. (deftrap _COPYMOVIESELECTION ((M (:POINTER :MOVIERECORD)))
  900.    (:STACK (:POINTER :MOVIERECORD))
  901.    (:STACK-TRAP #xAAAA :D0 142 M))
  902.  
  903. (deftrap _PASTEMOVIESELECTION ((M (:POINTER :MOVIERECORD)) (SRC (:POINTER :MOVIERECORD)))
  904.    NIL
  905.    (:STACK-TRAP #xAAAA :D0 143 M SRC))
  906.  
  907. (deftrap _ADDMOVIESELECTION ((M (:POINTER :MOVIERECORD)) (SRC (:POINTER :MOVIERECORD)))
  908.    NIL
  909.    (:STACK-TRAP #xAAAA :D0 338 M SRC))
  910.  
  911. (deftrap _CLEARMOVIESELECTION ((M (:POINTER :MOVIERECORD)))
  912.    NIL
  913.    (:STACK-TRAP #xAAAA :D0 225 M))
  914.  
  915. ;   Middle-level Editing Routines  
  916.  
  917. (deftrap _INSERTTRACKSEGMENT ((SRCTRACK (:POINTER :TRACKRECORD)) (DSTTRACK (:POINTER :TRACKRECORD)) (SRCIN :SIGNED-LONG) (SRCDURATION :SIGNED-LONG) (DSTIN :SIGNED-LONG))
  918.    (:STACK :SIGNED-INTEGER)
  919.    (:STACK-TRAP #xAAAA :D0 133 SRCTRACK DSTTRACK SRCIN SRCDURATION DSTIN))
  920.  
  921. (deftrap _INSERTMOVIESEGMENT ((SRCMOVIE (:POINTER :MOVIERECORD)) (DSTMOVIE (:POINTER :MOVIERECORD)) (SRCIN :SIGNED-LONG) (SRCDURATION :SIGNED-LONG) (DSTIN :SIGNED-LONG))
  922.    (:STACK :SIGNED-INTEGER)
  923.    (:STACK-TRAP #xAAAA :D0 134 SRCMOVIE DSTMOVIE SRCIN SRCDURATION DSTIN))
  924.  
  925. (deftrap _INSERTEMPTYTRACKSEGMENT ((DSTTRACK (:POINTER :TRACKRECORD)) (DSTIN :SIGNED-LONG) (DSTDURATION :SIGNED-LONG))
  926.    (:STACK :SIGNED-INTEGER)
  927.    (:STACK-TRAP #xAAAA :D0 135 DSTTRACK DSTIN DSTDURATION))
  928.  
  929. (deftrap _INSERTEMPTYMOVIESEGMENT ((DSTMOVIE (:POINTER :MOVIERECORD)) (DSTIN :SIGNED-LONG) (DSTDURATION :SIGNED-LONG))
  930.    (:STACK :SIGNED-INTEGER)
  931.    (:STACK-TRAP #xAAAA :D0 136 DSTMOVIE DSTIN DSTDURATION))
  932.  
  933. (deftrap _DELETETRACKSEGMENT ((T (:POINTER :TRACKRECORD)) (DSTIN :SIGNED-LONG) (DURATION :SIGNED-LONG))
  934.    (:STACK :SIGNED-INTEGER)
  935.    (:STACK-TRAP #xAAAA :D0 137 T DSTIN DURATION))
  936.  
  937. (deftrap _DELETEMOVIESEGMENT ((M (:POINTER :MOVIERECORD)) (DSTIN :SIGNED-LONG) (DURATION :SIGNED-LONG))
  938.    (:STACK :SIGNED-INTEGER)
  939.    (:STACK-TRAP #xAAAA :D0 138 M DSTIN DURATION))
  940.  
  941. (deftrap _SCALETRACKSEGMENT ((T (:POINTER :TRACKRECORD)) (DSTIN :SIGNED-LONG) (OLDDURATION :SIGNED-LONG) (NEWDURATION :SIGNED-LONG))
  942.    (:STACK :SIGNED-INTEGER)
  943.    (:STACK-TRAP #xAAAA :D0 139 T DSTIN OLDDURATION NEWDURATION))
  944.  
  945. (deftrap _SCALEMOVIESEGMENT ((M (:POINTER :MOVIERECORD)) (DSTIN :SIGNED-LONG) (OLDDURATION :SIGNED-LONG) (NEWDURATION :SIGNED-LONG))
  946.    (:STACK :SIGNED-INTEGER)
  947.    (:STACK-TRAP #xAAAA :D0 140 M DSTIN OLDDURATION NEWDURATION))
  948.  
  949.  
  950. (deftrap _COPYTRACKSETTINGS ((SRCTRACK (:POINTER :TRACKRECORD)) (DSTTRACK (:POINTER :TRACKRECORD)))
  951.    (:STACK :SIGNED-INTEGER)
  952.    (:STACK-TRAP #xAAAA :D0 339 SRCTRACK DSTTRACK))
  953.  
  954. (deftrap _COPYMOVIESETTINGS ((SRCMOVIE (:POINTER :MOVIERECORD)) (DSTMOVIE (:POINTER :MOVIERECORD)))
  955.    (:STACK :SIGNED-INTEGER)
  956.    (:STACK-TRAP #xAAAA :D0 340 SRCMOVIE DSTMOVIE))
  957.  
  958. ;   low-level Editing Routines  
  959.  
  960. (deftrap _INSERTMEDIAINTOTRACK ((T (:POINTER :TRACKRECORD)) (TRACKSTART :SIGNED-LONG) (MEDIATIME :SIGNED-LONG) (MEDIADURATION :SIGNED-LONG) (MEDIARATE :SIGNED-LONG))
  961.    (:STACK :SIGNED-INTEGER)
  962.    (:STACK-TRAP #xAAAA :D0 387 T TRACKSTART MEDIATIME MEDIADURATION MEDIARATE))
  963.  
  964.  
  965. (deftrap _BEGINMEDIAEDITS ((M (:POINTER :MEDIARECORD)))
  966.    (:STACK :SIGNED-INTEGER)
  967.    (:STACK-TRAP #xAAAA :D0 114 M))
  968.  
  969. (deftrap _ENDMEDIAEDITS ((M (:POINTER :MEDIARECORD)))
  970.    (:STACK :SIGNED-INTEGER)
  971.    (:STACK-TRAP #xAAAA :D0 115 M))
  972.  
  973. ;   movie & track edit state Routines  
  974.  
  975. (deftrap _NEWMOVIEEDITSTATE ((M (:POINTER :MOVIERECORD)))
  976.    (:STACK (:POINTER :MOVIEEDITSTATERECORD))
  977.    (:STACK-TRAP #xAAAA :D0 260 M))
  978.  
  979. (deftrap _USEMOVIEEDITSTATE ((M (:POINTER :MOVIERECORD)) (TOSTATE (:POINTER :MOVIEEDITSTATERECORD)))
  980.    (:STACK :SIGNED-INTEGER)
  981.    (:STACK-TRAP #xAAAA :D0 261 M TOSTATE))
  982.  
  983. (deftrap _DISPOSEMOVIEEDITSTATE ((STATE (:POINTER :MOVIEEDITSTATERECORD)))
  984.    (:STACK :SIGNED-INTEGER)
  985.    (:STACK-TRAP #xAAAA :D0 262 STATE))
  986.  
  987.  
  988. (deftrap _NEWTRACKEDITSTATE ((T (:POINTER :TRACKRECORD)))
  989.    (:STACK (:POINTER :TRACKEDITSTATERECORD))
  990.    (:STACK-TRAP #xAAAA :D0 263 T))
  991.  
  992. (deftrap _USETRACKEDITSTATE ((T (:POINTER :TRACKRECORD)) (STATE (:POINTER :TRACKEDITSTATERECORD)))
  993.    (:STACK :SIGNED-INTEGER)
  994.    (:STACK-TRAP #xAAAA :D0 264 T STATE))
  995.  
  996. (deftrap _DISPOSETRACKEDITSTATE ((STATE (:POINTER :TRACKEDITSTATERECORD)))
  997.    (:STACK :SIGNED-INTEGER)
  998.    (:STACK-TRAP #xAAAA :D0 265 STATE))
  999.  
  1000. ;   Miscellaneous Routines  
  1001.  
  1002. (deftrap _TRACKTIMETOMEDIATIME ((VALUE :SIGNED-LONG) (T (:POINTER :TRACKRECORD)))
  1003.    (:STACK :SIGNED-LONG)
  1004.    (:STACK-TRAP #xAAAA :D0 150 VALUE T))
  1005.  
  1006.  
  1007. (deftrap _GETMOVIEDATASIZE ((M (:POINTER :MOVIERECORD)) (STARTTIME :SIGNED-LONG) (DURATION :SIGNED-LONG))
  1008.    (:STACK :SIGNED-LONG)
  1009.    (:STACK-TRAP #xAAAA :D0 152 M STARTTIME DURATION))
  1010.  
  1011. (deftrap _GETTRACKDATASIZE ((T (:POINTER :TRACKRECORD)) (STARTTIME :SIGNED-LONG) (DURATION :SIGNED-LONG))
  1012.    (:STACK :SIGNED-LONG)
  1013.    (:STACK-TRAP #xAAAA :D0 329 T STARTTIME DURATION))
  1014.  
  1015. (deftrap _GETMEDIADATASIZE ((M (:POINTER :MEDIARECORD)) (STARTTIME :SIGNED-LONG) (DURATION :SIGNED-LONG))
  1016.    (:STACK :SIGNED-LONG)
  1017.    (:STACK-TRAP #xAAAA :D0 153 M STARTTIME DURATION))
  1018.  
  1019.  
  1020. (deftrap _PTINMOVIE ((M (:POINTER :MOVIERECORD)) (PT :POINT))
  1021.    (:STACK :BOOLEAN)
  1022.    (:STACK-TRAP #xAAAA :D0 154 M PT))
  1023.  
  1024. (deftrap _PTINTRACK ((T (:POINTER :TRACKRECORD)) (PT :POINT))
  1025.    (:STACK :BOOLEAN)
  1026.    (:STACK-TRAP #xAAAA :D0 155 T PT))
  1027.  
  1028.  
  1029. (deftrap _UPDATEMOVIE ((M (:POINTER :MOVIERECORD)))
  1030.    (:STACK :SIGNED-INTEGER)
  1031.    (:STACK-TRAP #xAAAA :D0 31 M))
  1032.  
  1033. ;   Alternate Group Selection Routines  
  1034.  
  1035. (deftrap _SETMOVIELANGUAGE ((M (:POINTER :MOVIERECORD)) (LANGUAGE :SIGNED-LONG))
  1036.    NIL
  1037.    (:STACK-TRAP #xAAAA :D0 156 M LANGUAGE))
  1038.  
  1039.  
  1040. (deftrap _SETAUTOTRACKALTERNATESENABLED ((M (:POINTER :MOVIERECORD)) (ENABLE :BOOLEAN))
  1041.    NIL
  1042.    (:STACK-TRAP #xAAAA :D0 350 M ENABLE))
  1043.  
  1044. (deftrap _SELECTMOVIEALTERNATES ((M (:POINTER :MOVIERECORD)))
  1045.    NIL
  1046.    (:STACK-TRAP #xAAAA :D0 351 M))
  1047.  
  1048. ;   UserData Routines  
  1049.  
  1050. (deftrap _GETUSERDATA ((U (:POINTER :USERDATARECORD)) (DATA :HANDLE) (UDTYPE :OSTYPE) (INDEX :SIGNED-LONG))
  1051.    (:STACK :SIGNED-INTEGER)
  1052.    (:STACK-TRAP #xAAAA :D0 158 U DATA UDTYPE INDEX))
  1053.  
  1054. (deftrap _ADDUSERDATA ((U (:POINTER :USERDATARECORD)) (DATA :HANDLE) (UDTYPE :OSTYPE))
  1055.    (:STACK :SIGNED-INTEGER)
  1056.    (:STACK-TRAP #xAAAA :D0 159 U DATA UDTYPE))
  1057.  
  1058. (deftrap _REMOVEUSERDATA ((U (:POINTER :USERDATARECORD)) (UDTYPE :OSTYPE) (INDEX :SIGNED-LONG))
  1059.    (:STACK :SIGNED-INTEGER)
  1060.    (:STACK-TRAP #xAAAA :D0 160 U UDTYPE INDEX))
  1061.  
  1062. (deftrap _COUNTUSERDATATYPE ((USERDATAH (:POINTER :USERDATARECORD)) (UDTYPE :OSTYPE))
  1063.    (:STACK :SIGNED-INTEGER)
  1064.    (:STACK-TRAP #xAAAA :D0 331 USERDATAH UDTYPE))
  1065.  
  1066. (deftrap _ADDUSERDATATEXT ((U (:POINTER :USERDATARECORD)) (DATA :HANDLE) (UDTYPE :OSTYPE) (INDEX :SIGNED-LONG) (ITLREGIONTAG :SIGNED-INTEGER))
  1067.    (:STACK :SIGNED-INTEGER)
  1068.    (:STACK-TRAP #xAAAA :D0 332 U DATA UDTYPE INDEX ITLREGIONTAG))
  1069.  
  1070. (deftrap _GETUSERDATATEXT ((U (:POINTER :USERDATARECORD)) (DATA :HANDLE) (UDTYPE :OSTYPE) (INDEX :SIGNED-LONG) (ITLREGIONTAG :SIGNED-INTEGER))
  1071.    (:STACK :SIGNED-INTEGER)
  1072.    (:STACK-TRAP #xAAAA :D0 333 U DATA UDTYPE INDEX ITLREGIONTAG))
  1073.  
  1074. (deftrap _REMOVEUSERDATATEXT ((U (:POINTER :USERDATARECORD)) (UDTYPE :OSTYPE) (INDEX :SIGNED-LONG) (ITLREGIONTAG :SIGNED-INTEGER))
  1075.    (:STACK :SIGNED-INTEGER)
  1076.    (:STACK-TRAP #xAAAA :D0 334 U UDTYPE INDEX ITLREGIONTAG))
  1077.  
  1078. ;   interesting time Routines  
  1079.  
  1080. (deftrap _GETMEDIANEXTINTERESTINGTIME ((M (:POINTER :MEDIARECORD)) (INTERESTINGTIMEFLAGS :SIGNED-INTEGER) (TIME :SIGNED-LONG) (RATE :SIGNED-LONG) (INTERESTINGTIME (:POINTER :SIGNED-LONG)) (INTERESTINGDURATION (:POINTER :SIGNED-LONG)))
  1081.    NIL
  1082.    (:STACK-TRAP #xAAAA :D0 365 M INTERESTINGTIMEFLAGS TIME RATE INTERESTINGTIME INTERESTINGDURATION))
  1083.  
  1084. (deftrap _GETTRACKNEXTINTERESTINGTIME ((T (:POINTER :TRACKRECORD)) (INTERESTINGTIMEFLAGS :SIGNED-INTEGER) (TIME :SIGNED-LONG) (RATE :SIGNED-LONG) (INTERESTINGTIME (:POINTER :SIGNED-LONG)) (INTERESTINGDURATION (:POINTER :SIGNED-LONG)))
  1085.    NIL
  1086.    (:STACK-TRAP #xAAAA :D0 226 T INTERESTINGTIMEFLAGS TIME RATE INTERESTINGTIME INTERESTINGDURATION))
  1087.  
  1088. (deftrap _GETMOVIENEXTINTERESTINGTIME ((M (:POINTER :MOVIERECORD)) (INTERESTINGTIMEFLAGS :SIGNED-INTEGER) (NUMMEDIATYPES :SIGNED-INTEGER) (WHICHMEDIATYPES :POINTER) (TIME :SIGNED-LONG) (RATE :SIGNED-LONG) (INTERESTINGTIME (:POINTER :SIGNED-LONG)) (INTERESTINGDURATION (:POINTER :SIGNED-LONG)))
  1089.    NIL
  1090.    (:STACK-TRAP #xAAAA :D0 270 M INTERESTINGTIMEFLAGS NUMMEDIATYPES WHICHMEDIATYPES TIME RATE INTERESTINGTIME INTERESTINGDURATION))
  1091.  
  1092. ;   movie file Routines  
  1093.  
  1094. (deftrap _CREATEMOVIEFILE ((FILESPEC :FSSPEC) (CREATOR :OSTYPE) (SCRIPTTAG :SIGNED-INTEGER) (CREATEMOVIEFILEFLAGS :SIGNED-LONG) (RESREFNUM (:POINTER :SIGNED-INTEGER)) (NEWMOVIE (:POINTER (:POINTER :MOVIERECORD))))
  1095.    (:STACK :SIGNED-INTEGER)
  1096.    (:STACK-TRAP #xAAAA :D0 401 FILESPEC CREATOR SCRIPTTAG CREATEMOVIEFILEFLAGS RESREFNUM NEWMOVIE))
  1097.  
  1098. (deftrap _DELETEMOVIEFILE ((FILESPEC :FSSPEC))
  1099.    (:STACK :SIGNED-INTEGER)
  1100.    (:STACK-TRAP #xAAAA :D0 373 FILESPEC))
  1101.  
  1102.  
  1103. (deftrap _OPENMOVIEFILE ((FILESPEC :FSSPEC) (RESREFNUM (:POINTER :SIGNED-INTEGER)) (PERMS :SIGNED-BYTE))
  1104.    (:STACK :SIGNED-INTEGER)
  1105.    (:STACK-TRAP #xAAAA :D0 402 FILESPEC RESREFNUM PERMS))
  1106.  
  1107. (deftrap _CLOSEMOVIEFILE ((RESREFNUM :SIGNED-INTEGER))
  1108.    (:STACK :SIGNED-INTEGER)
  1109.    (:STACK-TRAP #xAAAA :D0 213 RESREFNUM))
  1110.  
  1111. (defconstant $movieInDataForkResID -1);  magic res ID 
  1112.  
  1113.  
  1114. (deftrap _NEWMOVIEFROMFILE ((M (:POINTER (:POINTER :MOVIERECORD))) (RESREFNUM :SIGNED-INTEGER) (RESID (:POINTER :SIGNED-INTEGER)) (RESNAME (:STRING 255)) (NEWMOVIEFLAGS :SIGNED-INTEGER) (DATAREFWASCHANGED (:POINTER :BOOLEAN)))
  1115.    (:STACK :SIGNED-INTEGER)
  1116.    (:STACK-TRAP #xAAAA :D0 240 M RESREFNUM RESID RESNAME NEWMOVIEFLAGS DATAREFWASCHANGED))
  1117.  
  1118.  
  1119. (deftrap _ADDMOVIERESOURCE ((M (:POINTER :MOVIERECORD)) (RESREFNUM :SIGNED-INTEGER) (RESID (:POINTER :SIGNED-INTEGER)) (RESNAME (:STRING 255)))
  1120.    (:STACK :SIGNED-INTEGER)
  1121.    (:STACK-TRAP #xAAAA :D0 215 M RESREFNUM RESID RESNAME))
  1122.  
  1123. (deftrap _REMOVEMOVIERESOURCE ((RESREFNUM :SIGNED-INTEGER) (RESID :SIGNED-INTEGER))
  1124.    (:STACK :SIGNED-INTEGER)
  1125.    (:STACK-TRAP #xAAAA :D0 374 RESREFNUM RESID))
  1126.  
  1127. (deftrap _UPDATEMOVIERESOURCE ((M (:POINTER :MOVIERECORD)) (RESREFNUM :SIGNED-INTEGER) (RESID :SIGNED-INTEGER) (RESNAME (:STRING 255)))
  1128.    (:STACK :SIGNED-INTEGER)
  1129.    (:STACK-TRAP #xAAAA :D0 216 M RESREFNUM RESID RESNAME))
  1130.  
  1131.  
  1132. (deftrap _HASMOVIECHANGED ((M (:POINTER :MOVIERECORD)))
  1133.    (:STACK :BOOLEAN)
  1134.    (:STACK-TRAP #xAAAA :D0 217 M))
  1135.  
  1136. (deftrap _CLEARMOVIECHANGED ((M (:POINTER :MOVIERECORD)))
  1137.    NIL
  1138.    (:STACK-TRAP #xAAAA :D0 275 M))
  1139.  
  1140.  
  1141. (deftrap _FLATTENMOVIE ((M (:POINTER :MOVIERECORD)) (MOVIEFLATTENFLAGS :SIGNED-LONG) (THEFILE :FSSPEC) (CREATOR :OSTYPE) (SCRIPTTAG :SIGNED-INTEGER) (CREATEMOVIEFILEFLAGS :SIGNED-LONG) (RESID (:POINTER :SIGNED-INTEGER)) (RESNAME (:STRING 255)))
  1142.    NIL
  1143.    (:STACK-TRAP #xAAAA :D0 411 M MOVIEFLATTENFLAGS THEFILE CREATOR SCRIPTTAG CREATEMOVIEFILEFLAGS RESID RESNAME))
  1144.  
  1145. (deftrap _FLATTENMOVIEDATA ((M (:POINTER :MOVIERECORD)) (MOVIEFLATTENFLAGS :SIGNED-LONG) (THEFILE :FSSPEC) (CREATOR :OSTYPE) (SCRIPTTAG :SIGNED-INTEGER) (CREATEMOVIEFILEFLAGS :SIGNED-LONG))
  1146.    (:STACK (:POINTER :MOVIERECORD))
  1147.    (:STACK-TRAP #xAAAA :D0 412 M MOVIEFLATTENFLAGS THEFILE CREATOR SCRIPTTAG CREATEMOVIEFILEFLAGS))
  1148.  
  1149. (deftrap _SETMOVIEPROGRESSPROC ((M (:POINTER :MOVIERECORD)) (P :POINTER) (REFCON :SIGNED-LONG))
  1150.    NIL
  1151.    (:STACK-TRAP #xAAAA :D0 410 M P REFCON))
  1152.  
  1153.  
  1154. (deftrap _PUTMOVIEONSCRAP ((M (:POINTER :MOVIERECORD)) (MOVIESCRAPFLAGS :SIGNED-LONG))
  1155.    (:STACK :SIGNED-INTEGER)
  1156.    (:STACK-TRAP #xAAAA :D0 396 M MOVIESCRAPFLAGS))
  1157.  
  1158. (deftrap _NEWMOVIEFROMSCRAP ((NEWMOVIEFLAGS :SIGNED-LONG))
  1159.    (:STACK (:POINTER :MOVIERECORD))
  1160.    (:STACK-TRAP #xAAAA :D0 397 NEWMOVIEFLAGS))
  1161.  
  1162. ;   Video Media Routines  
  1163.  
  1164. (deftrap _GETVIDEOMEDIAGRAPHICSMODE ((MH (:POINTER :COMPONENTINSTANCERECORD)) (GRAPHICSMODE (:POINTER :SIGNED-LONG)) (OPCOLOR (:POINTER :RGBCOLOR)))
  1165.    (:STACK :SIGNED-LONG)
  1166.    (:STACK-TRAP #xA82A :D0 0 MH GRAPHICSMODE OPCOLOR ((+ (ASH 8 16) 257) :SIGNED-LONGINT)))
  1167.  
  1168. (deftrap _SETVIDEOMEDIAGRAPHICSMODE ((MH (:POINTER :COMPONENTINSTANCERECORD)) (GRAPHICSMODE :SIGNED-LONG) (OPCOLOR :RGBCOLOR))
  1169.    (:STACK :SIGNED-LONG)
  1170.    (:STACK-TRAP #xA82A :D0 0 MH GRAPHICSMODE OPCOLOR ((+ (ASH 8 16) 258) :SIGNED-LONGINT)))
  1171.  
  1172. ;   Sound Media Routines  
  1173.  
  1174. (deftrap _GETSOUNDMEDIABALANCE ((MH (:POINTER :COMPONENTINSTANCERECORD)) (BALANCE (:POINTER :SIGNED-INTEGER)))
  1175.    (:STACK :SIGNED-LONG)
  1176.    (:STACK-TRAP #xA82A :D0 0 MH BALANCE ((+ (ASH 4 16) 257) :SIGNED-LONGINT)))
  1177.  
  1178. (deftrap _SETSOUNDMEDIABALANCE ((MH (:POINTER :COMPONENTINSTANCERECORD)) (BALANCE :SIGNED-INTEGER))
  1179.    (:STACK :SIGNED-LONG)
  1180.    (:STACK-TRAP #xA82A :D0 0 MH BALANCE ((+ (ASH 2 16) 258) :SIGNED-LONGINT)))
  1181.  
  1182. (defconstant $couldNotResolveDataRef -2000)
  1183. (defconstant $badImageDescription -2001)
  1184. (defconstant $badPublicMovieAtom -2002)
  1185. (defconstant $cantFindHandler -2003)
  1186. (defconstant $cantOpenHandler -2004)
  1187. (defconstant $badComponentType -2005)
  1188. (defconstant $noMediaHandler -2006)
  1189. (defconstant $noDataHandler -2007)
  1190. (defconstant $invalidMedia -2008)
  1191. (defconstant $invalidTrack -2009)
  1192. (defconstant $invalidMovie -2010)
  1193. (defconstant $invalidSampleTable -2011)
  1194. (defconstant $invalidDataRef -2012)
  1195. (defconstant $invalidHandler -2013)
  1196. (defconstant $invalidDuration -2014)
  1197. (defconstant $invalidTime -2015)
  1198. (defconstant $cantPutPublicMovieAtom -2016)
  1199. (defconstant $badEditList -2017)
  1200. (defconstant $mediaTypesDontMatch -2018)
  1201. (defconstant $progressProcAborted -2019)
  1202. (defconstant $movieToolboxUnitialized -2020)
  1203. (defconstant $wfFileNotFound -2021)
  1204. (defconstant $cantCreateSingleForkFile -2022)
  1205. (defconstant $invalidEditState -2023)
  1206. (defconstant $nonMatchingEditState -2024)
  1207. (defconstant $staleEditState -2025)
  1208. (defconstant $userDataItemNotFound -2026)
  1209. (defconstant $maxSizeToGrowTooSmall -2027)
  1210. (defconstant $badTrackIndex -2028)
  1211. (defconstant $trackIDNotFound -2029)
  1212. (defconstant $trackNotInMovie -2030)
  1213. (defconstant $timeNotInTrack -2031)
  1214. (defconstant $timeNotInMedia -2032)
  1215. (defconstant $badEditIndex -2033)
  1216. (defconstant $internalQuickTimeError -2034)
  1217. (defconstant $cantEnableTrack -2035)
  1218. (defconstant $invalidRect -2036)
  1219. (defconstant $invalidSampleNum -2037)
  1220. (defconstant $invalidChunkNum -2038)
  1221. (defconstant $invalidSampleDescIndex -2039)
  1222. (defconstant $invalidChunkCache -2040)
  1223. (defconstant $invalidSampleDescription -2041)
  1224. (defconstant $dataNotOpenForRead -2042)
  1225. (defconstant $dataNotOpenForWrite -2043)
  1226. (defconstant $dataAlreadyOpenForWrite -2044)
  1227. (defconstant $dataAlreadyClosed -2045)
  1228. (defconstant $endOfDataReached -2046)
  1229. (defconstant $dataNoDataRef -2047)
  1230. (defconstant $noMovieFound -2048)
  1231. (defconstant $invalidDataRefContainer -2049)
  1232. (defconstant $badDataRefIndex -2050)
  1233. (defconstant $noDefaultDataRef -2051)
  1234. (defconstant $couldNotUseAnExistingSample -2052)
  1235. (defconstant $featureUnsupported -2053)
  1236.  
  1237. (defconstant $loopTimeBase 1)
  1238.  
  1239. ;  TimeBase Routines 
  1240. (def-mactype :TIMEBASEFLAGS (find-mactype :CHARACTER))
  1241.  
  1242. (defconstant $triggerTimeFwd #X1);  when curTime exceeds triggerTime going forward 
  1243. (defconstant $triggerTimeBwd #X2);  when curTime exceeds triggerTime going backwards 
  1244. (defconstant $triggerTimeEither #X3);  when curTime exceeds triggerTime going either direction 
  1245. (defconstant $triggerRateLT #X4);  when rate changes to less than trigger value 
  1246. (defconstant $triggerRateGT #X8);  when rate changes to greater than trigger value 
  1247. (defconstant $triggerRateEqual #X10);  when rate changes to equal trigger value 
  1248. (defconstant $triggerRateLTE #X14)
  1249. (defconstant $triggerRateGTE #X18)
  1250. (defconstant $triggerRateNotEqual #X1C)
  1251. (defconstant $triggerRateChange 0)
  1252. (defconstant $timeBaseBeforeStartTime 1)
  1253. (defconstant $timeBaseAfterStopTime 2)
  1254. (defconstant $callBackAtTime 1)
  1255. (defconstant $callBackAtRate 2)
  1256. (defconstant $callBackAtTimeJump 3)
  1257. (defconstant $callBackAtInterrupt #X8000)
  1258.  
  1259. (def-mactype :QTCALLBACKPROC (find-mactype :POINTER))
  1260.  
  1261. (defconstant $qtcbNeedsRateChanges 1)
  1262. (defconstant $qtcbNeedsTimeChanges 2)
  1263.  
  1264. ;  CallBack equates 
  1265. (defrecord QTCallBackHeader 
  1266.    (callBackFlags :SIGNED-LONG)
  1267.    (reserved1 :SIGNED-LONG)
  1268.    (qtPrivate (:ARRAY :UNSIGNED-BYTE 40))
  1269.    )
  1270.  
  1271. ;   TimeBase Routines  
  1272.  
  1273. (deftrap _NEWTIMEBASE NIL
  1274.    (:STACK (:POINTER :TIMEBASERECORD))
  1275.    (:STACK-TRAP #xAAAA :D0 165))
  1276.  
  1277. (deftrap _DISPOSETIMEBASE ((TB (:POINTER :TIMEBASERECORD)))
  1278.    NIL
  1279.    (:STACK-TRAP #xAAAA :D0 182 TB))
  1280.  
  1281.  
  1282. (deftrap _GETTIMEBASETIME ((TB (:POINTER :TIMEBASERECORD)) (S :SIGNED-LONG) (OUT (:POINTER :TIMERECORD)))
  1283.    (:STACK :SIGNED-LONG)
  1284.    (:STACK-TRAP #xAAAA :D0 166 TB S OUT))
  1285.  
  1286. (deftrap _SETTIMEBASETIME ((TB (:POINTER :TIMEBASERECORD)) (TR :TIMERECORD))
  1287.    NIL
  1288.    (:STACK-TRAP #xAAAA :D0 167 TB TR))
  1289.  
  1290. (deftrap _SETTIMEBASEVALUE ((TB (:POINTER :TIMEBASERECORD)) (T :SIGNED-LONG) (S :SIGNED-LONG))
  1291.    NIL
  1292.    (:STACK-TRAP #xAAAA :D0 168 TB T S))
  1293.  
  1294.  
  1295. (deftrap _GETTIMEBASERATE ((TB (:POINTER :TIMEBASERECORD)))
  1296.    (:STACK :SIGNED-LONG)
  1297.    (:STACK-TRAP #xAAAA :D0 169 TB))
  1298.  
  1299. (deftrap _SETTIMEBASERATE ((TB (:POINTER :TIMEBASERECORD)) (R :SIGNED-LONG))
  1300.    NIL
  1301.    (:STACK-TRAP #xAAAA :D0 170 TB R))
  1302.  
  1303.  
  1304. (deftrap _GETTIMEBASESTARTTIME ((TB (:POINTER :TIMEBASERECORD)) (S :SIGNED-LONG) (OUT (:POINTER :TIMERECORD)))
  1305.    (:STACK :SIGNED-LONG)
  1306.    (:STACK-TRAP #xAAAA :D0 171 TB S OUT))
  1307.  
  1308. (deftrap _SETTIMEBASESTARTTIME ((TB (:POINTER :TIMEBASERECORD)) (TR :TIMERECORD))
  1309.    NIL
  1310.    (:STACK-TRAP #xAAAA :D0 172 TB TR))
  1311.  
  1312. (deftrap _GETTIMEBASESTOPTIME ((TB (:POINTER :TIMEBASERECORD)) (S :SIGNED-LONG) (OUT (:POINTER :TIMERECORD)))
  1313.    (:STACK :SIGNED-LONG)
  1314.    (:STACK-TRAP #xAAAA :D0 173 TB S OUT))
  1315.  
  1316. (deftrap _SETTIMEBASESTOPTIME ((TB (:POINTER :TIMEBASERECORD)) (TR :TIMERECORD))
  1317.    NIL
  1318.    (:STACK-TRAP #xAAAA :D0 174 TB TR))
  1319.  
  1320.  
  1321. (deftrap _GETTIMEBASEFLAGS ((TB (:POINTER :TIMEBASERECORD)))
  1322.    (:STACK :SIGNED-LONG)
  1323.    (:STACK-TRAP #xAAAA :D0 177 TB))
  1324.  
  1325. (deftrap _SETTIMEBASEFLAGS ((TB (:POINTER :TIMEBASERECORD)) (TIMEBASEFLAGS :SIGNED-LONG))
  1326.    NIL
  1327.    (:STACK-TRAP #xAAAA :D0 178 TB TIMEBASEFLAGS))
  1328.  
  1329.  
  1330. (deftrap _SETTIMEBASEMASTERTIMEBASE ((SLAVE (:POINTER :TIMEBASERECORD)) (MASTER (:POINTER :TIMEBASERECORD)) (SLAVEZERO :TIMERECORD))
  1331.    NIL
  1332.    (:STACK-TRAP #xAAAA :D0 180 SLAVE MASTER SLAVEZERO))
  1333.  
  1334. (deftrap _GETTIMEBASEMASTERTIMEBASE ((TB (:POINTER :TIMEBASERECORD)))
  1335.    (:STACK (:POINTER :TIMEBASERECORD))
  1336.    (:STACK-TRAP #xAAAA :D0 175 TB))
  1337.  
  1338. (deftrap _SETTIMEBASEMASTERCLOCK ((SLAVE (:POINTER :TIMEBASERECORD)) (CLOCKMEISTER (:POINTER :COMPONENTRECORD)) (SLAVEZERO :TIMERECORD))
  1339.    NIL
  1340.    (:STACK-TRAP #xAAAA :D0 179 SLAVE CLOCKMEISTER SLAVEZERO))
  1341.  
  1342. (deftrap _GETTIMEBASEMASTERCLOCK ((TB (:POINTER :TIMEBASERECORD)))
  1343.    (:STACK (:POINTER :COMPONENTINSTANCERECORD))
  1344.    (:STACK-TRAP #xAAAA :D0 176 TB))
  1345.  
  1346.  
  1347. (deftrap _CONVERTTIME ((INOUT (:POINTER :TIMERECORD)) (NEWBASE (:POINTER :TIMEBASERECORD)))
  1348.    NIL
  1349.    (:STACK-TRAP #xAAAA :D0 181 INOUT NEWBASE))
  1350.  
  1351. (deftrap _CONVERTTIMESCALE ((INOUT (:POINTER :TIMERECORD)) (NEWSCALE :SIGNED-LONG))
  1352.    NIL
  1353.    (:STACK-TRAP #xAAAA :D0 183 INOUT NEWSCALE))
  1354.  
  1355. (deftrap _ADDTIME ((DST (:POINTER :TIMERECORD)) (SRC :TIMERECORD))
  1356.    NIL
  1357.    (:STACK-TRAP #xAAAA :D0 268 DST SRC))
  1358.  
  1359. (deftrap _SUBTRACTTIME ((DST (:POINTER :TIMERECORD)) (SRC :TIMERECORD))
  1360.    NIL
  1361.    (:STACK-TRAP #xAAAA :D0 269 DST SRC))
  1362.  
  1363.  
  1364. (deftrap _GETTIMEBASESTATUS ((TB (:POINTER :TIMEBASERECORD)) (UNPINNEDTIME (:POINTER :TIMERECORD)))
  1365.    (:STACK :SIGNED-LONG)
  1366.    (:STACK-TRAP #xAAAA :D0 267 TB UNPINNEDTIME))
  1367.  
  1368.  
  1369. (deftrap _SETTIMEBASEZERO ((TB (:POINTER :TIMEBASERECORD)) (ZERO (:POINTER :TIMERECORD)))
  1370.    NIL
  1371.    (:STACK-TRAP #xAAAA :D0 296 TB ZERO))
  1372.  
  1373. ;   CallBack Routines  
  1374.  
  1375. (deftrap _NEWCALLBACK ((TB (:POINTER :TIMEBASERECORD)) (CBTYPE :SIGNED-INTEGER))
  1376.    (:STACK (:POINTER :CALLBACKRECORD))
  1377.    (:STACK-TRAP #xAAAA :D0 235 TB CBTYPE))
  1378.  
  1379.  
  1380. (deftrap _DISPOSECALLBACK ((QTCALL (:POINTER :CALLBACKRECORD)))
  1381.    NIL
  1382.    (:STACK-TRAP #xAAAA :D0 236 QTCALL))
  1383.  
  1384.  
  1385. (deftrap _GETCALLBACKTYPE ((QTCALL (:POINTER :CALLBACKRECORD)))
  1386.    (:STACK :SIGNED-INTEGER)
  1387.    (:STACK-TRAP #xAAAA :D0 237 QTCALL))
  1388.  
  1389. (deftrap _GETCALLBACKTIMEBASE ((QTCALL (:POINTER :CALLBACKRECORD)))
  1390.    (:STACK (:POINTER :TIMEBASERECORD))
  1391.    (:STACK-TRAP #xAAAA :D0 238 QTCALL))
  1392.  
  1393.  
  1394. (deftrap _CALLMEWHEN ((QTCALL (:POINTER :CALLBACKRECORD)) (CALLBACKPROC :POINTER) (REFCON :SIGNED-LONG) (PARAM1 :SIGNED-LONG) (PARAM2 :SIGNED-LONG) (PARAM3 :SIGNED-LONG))
  1395.    (:STACK :SIGNED-INTEGER)
  1396.    (:STACK-TRAP #xAAAA :D0 184 QTCALL CALLBACKPROC REFCON PARAM1 PARAM2 PARAM3))
  1397.  
  1398.  
  1399. (deftrap _CANCELCALLBACK ((CB (:POINTER :CALLBACKRECORD)))
  1400.    NIL
  1401.    (:STACK-TRAP #xAAAA :D0 185 CB))
  1402.  
  1403. ;   Clock CallBack support Routines  
  1404.  
  1405. (deftrap _ADDCALLBACKTOTIMEBASE ((CB (:POINTER :CALLBACKRECORD)))
  1406.    (:STACK :SIGNED-INTEGER)
  1407.    (:STACK-TRAP #xAAAA :D0 297 CB))
  1408.  
  1409. (deftrap _REMOVECALLBACKFROMTIMEBASE ((CB (:POINTER :CALLBACKRECORD)))
  1410.    (:STACK :SIGNED-INTEGER)
  1411.    (:STACK-TRAP #xAAAA :D0 298 CB))
  1412.  
  1413. (deftrap _GETFIRSTCALLBACK ((TB (:POINTER :TIMEBASERECORD)))
  1414.    (:STACK (:POINTER :CALLBACKRECORD))
  1415.    (:STACK-TRAP #xAAAA :D0 299 TB))
  1416.  
  1417. (deftrap _GETNEXTCALLBACK ((CB (:POINTER :CALLBACKRECORD)))
  1418.    (:STACK (:POINTER :CALLBACKRECORD))
  1419.    (:STACK-TRAP #xAAAA :D0 300 CB))
  1420.  
  1421. (deftrap _EXECUTECALLBACK ((CB (:POINTER :CALLBACKRECORD)))
  1422.    NIL
  1423.    (:STACK-TRAP #xAAAA :D0 301 CB))
  1424.  
  1425. ;  Movie Controller Routines 
  1426. (defconstant $MovieControllerComponentType :|play|)
  1427.  
  1428. (defconstant $mcActionIdle 1)
  1429. (defconstant $mcActionDraw 2)
  1430. (defconstant $mcActionActivate 3)
  1431. (defconstant $mcActionDeactivate 4)
  1432. (defconstant $mcActionMouseDown 5)
  1433. (defconstant $mcActionKey 6)
  1434. (defconstant $mcActionPlay 8)
  1435. (defconstant $mcActionGoToTime 12)
  1436. (defconstant $mcActionSetVolume 14)
  1437. (defconstant $mcActionGetVolume 15)
  1438. (defconstant $mcActionStep 18)
  1439. (defconstant $mcActionSetLooping 21)
  1440. (defconstant $mcActionGetLooping 22)
  1441. (defconstant $mcActionSetLoopIsPalindrome 23)
  1442. (defconstant $mcActionGetLoopIsPalindrome 24)
  1443. (defconstant $mcActionSetGrowBoxBounds 25)
  1444. (defconstant $mcActionControllerSizeChanged 26)
  1445. (defconstant $mcActionSetSelectionBegin 29)
  1446. (defconstant $mcActionSetSelectionDuration 30)
  1447. (defconstant $mcActionSetPosterTime 31)
  1448. (defconstant $mcActionSetKeysEnabled 32)
  1449. (defconstant $mcActionGetKeysEnabled 33)
  1450. (defconstant $mcActionSetPlaySelection 34)
  1451. (defconstant $mcActionGetPlaySelection 35)
  1452. (defconstant $mcActionSetUseBadge 36)
  1453. (defconstant $mcActionGetUseBadge 37)
  1454. (defconstant $mcActionSetFlags 38)
  1455. (defconstant $mcActionGetFlags 39)
  1456. (defconstant $mcActionSetPlayEveryFrame 40)
  1457. (defconstant $mcActionGetPlayEveryFrame 41)
  1458. (defconstant $mcActionGetPlayRate 42)
  1459. (defconstant $mcActionShowBalloon 43)
  1460. (defconstant $mcActionBadgeClick 44)
  1461.  
  1462. (def-mactype :MCACTION (find-mactype :SIGNED-INTEGER))
  1463. (def-mactype :MCACTIONFILTER (find-mactype :POINTER))
  1464.  
  1465. (defconstant $mcTopLeftMovie #X1)
  1466. (defconstant $mcScaleMovieToFit #X2)
  1467. (defconstant $mcWithBadge #X4)
  1468. (defconstant $mcNotVisible #X8)
  1469. (defconstant $mcWithFrame #X10)
  1470. (defconstant $mcInfoUndoAvailable #X1)
  1471. (defconstant $mcInfoCutAvailable #X2)
  1472. (defconstant $mcInfoCopyAvailable #X4)
  1473. (defconstant $mcInfoPasteAvailable #X8)
  1474. (defconstant $mcInfoClearAvailable #X10)
  1475. (defconstant $mcInfoHasSound #X20)
  1476. (defconstant $mcInfoIsPlaying #X40)
  1477. (defconstant $mcInfoIsLooping #X80)
  1478. (defconstant $mcInfoIsInPalindrome #X100)
  1479. (defconstant $mcInfoEditingEnabled #X200)
  1480.  
  1481. ;   target management  
  1482.  
  1483. (deftrap _NEWMOVIECONTROLLER ((M (:POINTER :MOVIERECORD)) (MOVIERECT :RECT) (CONTROLLERCREATIONFLAGS :SIGNED-LONG))
  1484.    (:STACK (:POINTER :COMPONENTINSTANCERECORD))
  1485.    (:STACK-TRAP #xAAAA :D0 394 M MOVIERECT CONTROLLERCREATIONFLAGS))
  1486.  
  1487. (deftrap _DISPOSEMOVIECONTROLLER ((MC (:POINTER :COMPONENTINSTANCERECORD)))
  1488.    NIL
  1489.    (:STACK-TRAP #xAAAA :D0 395 MC))
  1490.  
  1491.  
  1492. (deftrap _MCSETMOVIE ((MC (:POINTER :COMPONENTINSTANCERECORD)) (M (:POINTER :MOVIERECORD)) (MOVIEWINDOW (:POINTER :GRAFPORT)) (WHERE :POINT))
  1493.    (:STACK :SIGNED-LONG)
  1494.    (:STACK-TRAP #xA82A :D0 0 MC M MOVIEWINDOW WHERE ((+ (ASH 12 16) 2) :SIGNED-LONGINT)))
  1495.  
  1496. ; Not in ROM - INLINE =  #x4267 #x2F3C #x0002 #x0005 #x7000 #xA82A
  1497. ; Translated by hand
  1498. (deftrap _MCGETMOVIE ((MC (:POINTER :COMPONENTINSTANCERECORD)))
  1499.    (:STACK (:POINTER :MOVIERECORD))
  1500.    (:STACK-TRAP #xa82a :d0 0 MC (0 :integer) (#x20005 :signed-long)))
  1501.  
  1502. (deftrap _MCREMOVEMOVIE ((MC (:POINTER :COMPONENTINSTANCERECORD)))
  1503.    (:STACK :SIGNED-LONG)
  1504.    (:STACK-TRAP #xA82A :D0 0 MC ((+ (ASH 0 16) 6) :SIGNED-LONGINT)))
  1505.  
  1506. ;   event handling etc.  
  1507.  
  1508. (deftrap _MCISPLAYEREVENT ((MC (:POINTER :COMPONENTINSTANCERECORD)) (E :EVENTRECORD))
  1509.    (:STACK :SIGNED-LONG)
  1510.    (:STACK-TRAP #xA82A :D0 0 MC E ((+ (ASH 4 16) 7) :SIGNED-LONGINT)))
  1511.  
  1512. (deftrap _MCSETACTIONFILTER ((MC (:POINTER :COMPONENTINSTANCERECORD)) (FILTER :POINTER))
  1513.    (:STACK :SIGNED-LONG)
  1514.    (:STACK-TRAP #xA82A :D0 0 MC FILTER ((+ (ASH 4 16) 8) :SIGNED-LONGINT)))
  1515.  
  1516. (deftrap _MCDOACTION ((MC (:POINTER :COMPONENTINSTANCERECORD)) (ACTION :SIGNED-INTEGER) (PARAMS :POINTER))
  1517.    (:STACK :SIGNED-LONG)
  1518.    (:STACK-TRAP #xA82A :D0 0 MC ACTION PARAMS ((+ (ASH 6 16) 9) :SIGNED-LONGINT)))
  1519.  
  1520. ;   state type things  
  1521.  
  1522. (deftrap _MCSETCONTROLLERATTACHED ((MC (:POINTER :COMPONENTINSTANCERECORD)) (ATTACH :BOOLEAN))
  1523.    (:STACK :SIGNED-LONG)
  1524.    (:STACK-TRAP #xA82A :D0 0 MC ATTACH ((+ (ASH 2 16) 10) :SIGNED-LONGINT)))
  1525.  
  1526. (deftrap _MCISCONTROLLERATTACHED ((MC (:POINTER :COMPONENTINSTANCERECORD)))
  1527.    (:STACK :SIGNED-LONG)
  1528.    (:STACK-TRAP #xA82A :D0 0 MC ((+ (ASH 0 16) 11) :SIGNED-LONGINT)))
  1529.  
  1530. (deftrap _MCSETCONTROLLERPORT ((MC (:POINTER :COMPONENTINSTANCERECORD)) (GP (:POINTER :CGRAFPORT)))
  1531.    (:STACK :SIGNED-LONG)
  1532.    (:STACK-TRAP #xA82A :D0 0 MC GP ((+ (ASH 4 16) 12) :SIGNED-LONGINT)))
  1533.  
  1534. (deftrap _MCGETCONTROLLERPORT ((MC (:POINTER :COMPONENTINSTANCERECORD)))
  1535.    (:STACK (:POINTER :CGRAFPORT))
  1536.    (:STACK-TRAP #xA82A :D0 0 MC ((+ (ASH 0 16) 13) :SIGNED-LONGINT)))
  1537.  
  1538.  
  1539. (deftrap _MCSETVISIBLE ((MC (:POINTER :COMPONENTINSTANCERECORD)) (SHOW :BOOLEAN))
  1540.    (:STACK :SIGNED-LONG)
  1541.    (:STACK-TRAP #xA82A :D0 0 MC SHOW ((+ (ASH 2 16) 14) :SIGNED-LONGINT)))
  1542.  
  1543. (deftrap _MCGETVISIBLE ((MC (:POINTER :COMPONENTINSTANCERECORD)))
  1544.    (:STACK :SIGNED-LONG)
  1545.    (:STACK-TRAP #xA82A :D0 0 MC ((+ (ASH 0 16) 15) :SIGNED-LONGINT)))
  1546.  
  1547.  
  1548. (deftrap _MCGETCONTROLLERBOUNDSRECT ((MC (:POINTER :COMPONENTINSTANCERECORD)) (BOUNDS (:POINTER :RECT)))
  1549.    (:STACK :SIGNED-LONG)
  1550.    (:STACK-TRAP #xA82A :D0 0 MC BOUNDS ((+ (ASH 4 16) 16) :SIGNED-LONGINT)))
  1551.  
  1552. (deftrap _MCSETCONTROLLERBOUNDSRECT ((MC (:POINTER :COMPONENTINSTANCERECORD)) (BOUNDS :RECT))
  1553.    (:STACK :SIGNED-LONG)
  1554.    (:STACK-TRAP #xA82A :D0 0 MC BOUNDS ((+ (ASH 4 16) 17) :SIGNED-LONGINT)))
  1555.  
  1556. (deftrap _MCGETCONTROLLERBOUNDSRGN ((MC (:POINTER :COMPONENTINSTANCERECORD)))
  1557.    (:STACK (:HANDLE :REGION))
  1558.    (:STACK-TRAP #xA82A :D0 0 MC ((+ (ASH 0 16) 18) :SIGNED-LONGINT)))
  1559.  
  1560. (deftrap _MCGETWINDOWRGN ((MC (:POINTER :COMPONENTINSTANCERECORD)) (W (:POINTER :GRAFPORT)))
  1561.    (:STACK (:HANDLE :REGION))
  1562.    (:STACK-TRAP #xA82A :D0 0 MC W ((+ (ASH 4 16) 19) :SIGNED-LONGINT)))
  1563.  
  1564. ;   other stuff  
  1565.  
  1566. (deftrap _MCMOVIECHANGED ((MC (:POINTER :COMPONENTINSTANCERECORD)) (M (:POINTER :MOVIERECORD)))
  1567.    (:STACK :SIGNED-LONG)
  1568.    (:STACK-TRAP #xA82A :D0 0 MC M ((+ (ASH 4 16) 20) :SIGNED-LONGINT)))
  1569.  
  1570. (deftrap _MCSETDURATION ((MC (:POINTER :COMPONENTINSTANCERECORD)) (DURATION :SIGNED-LONG))
  1571.    (:STACK :SIGNED-LONG)
  1572.    (:STACK-TRAP #xA82A :D0 0 MC DURATION ((+ (ASH 4 16) 21) :SIGNED-LONGINT)))
  1573.  
  1574. (deftrap _MCGETCURRENTTIME ((MC (:POINTER :COMPONENTINSTANCERECORD)) (SCALE (:POINTER :SIGNED-LONG)))
  1575.    (:STACK :SIGNED-LONG)
  1576.    (:STACK-TRAP #xA82A :D0 0 MC SCALE ((+ (ASH 4 16) 22) :SIGNED-LONGINT)))
  1577.  
  1578. (deftrap _MCNEWATTACHEDCONTROLLER ((MC (:POINTER :COMPONENTINSTANCERECORD)) (M (:POINTER :MOVIERECORD)) (W (:POINTER :GRAFPORT)) (WHERE :POINT))
  1579.    (:STACK :SIGNED-LONG)
  1580.    (:STACK-TRAP #xA82A :D0 0 MC M W WHERE ((+ (ASH 12 16) 23) :SIGNED-LONGINT)))
  1581.  
  1582. (deftrap _MCPOSITIONCONTROLLER ((MC (:POINTER :COMPONENTINSTANCERECORD)) (MOVIERECT (:POINTER :RECT)) (CONTROLLERRECT (:POINTER :RECT)) (CONTROLLERCREATIONFLAGS :SIGNED-LONG))
  1583.    (:STACK :SIGNED-LONG)
  1584.    (:STACK-TRAP #xA82A :D0 0 MC MOVIERECT CONTROLLERRECT CONTROLLERCREATIONFLAGS ((+ (ASH 12 16) 36) :SIGNED-LONGINT)))
  1585.  
  1586. ;   direct event handlers  
  1587.  
  1588. (deftrap _MCDRAW ((MC (:POINTER :COMPONENTINSTANCERECORD)) (W (:POINTER :GRAFPORT)))
  1589.    (:STACK :SIGNED-LONG)
  1590.    (:STACK-TRAP #xA82A :D0 0 MC W ((+ (ASH 4 16) 24) :SIGNED-LONGINT)))
  1591.  
  1592. (deftrap _MCACTIVATE ((MC (:POINTER :COMPONENTINSTANCERECORD)) (W (:POINTER :GRAFPORT)) (ACTIVATE :BOOLEAN))
  1593.    (:STACK :SIGNED-LONG)
  1594.    (:STACK-TRAP #xA82A :D0 0 MC W ACTIVATE ((+ (ASH 6 16) 25) :SIGNED-LONGINT)))
  1595.  
  1596. (deftrap _MCIDLE ((MC (:POINTER :COMPONENTINSTANCERECORD)))
  1597.    (:STACK :SIGNED-LONG)
  1598.    (:STACK-TRAP #xA82A :D0 0 MC ((+ (ASH 0 16) 26) :SIGNED-LONGINT)))
  1599.  
  1600. (deftrap _MCKEY ((MC (:POINTER :COMPONENTINSTANCERECORD)) (KEY :UNSIGNED-BYTE) (MODIFIERS :SIGNED-LONG))
  1601.    (:STACK :SIGNED-LONG)
  1602.    (:STACK-TRAP #xA82A :D0 0 MC KEY MODIFIERS ((+ (ASH 6 16) 27) :SIGNED-LONGINT)))
  1603.  
  1604. (deftrap _MCCLICK ((MC (:POINTER :COMPONENTINSTANCERECORD)) (W (:POINTER :GRAFPORT)) (WHERE :POINT) (WHEN :SIGNED-LONG) (MODIFIERS :SIGNED-LONG))
  1605.    (:STACK :SIGNED-LONG)
  1606.    (:STACK-TRAP #xA82A :D0 0 MC W WHERE WHEN MODIFIERS ((+ (ASH 16 16) 28) :SIGNED-LONGINT)))
  1607.  
  1608. ;    calls for editing  
  1609.  
  1610. (deftrap _MCENABLEEDITING ((MC (:POINTER :COMPONENTINSTANCERECORD)) (ENABLED :BOOLEAN))
  1611.    (:STACK :SIGNED-LONG)
  1612.    (:STACK-TRAP #xA82A :D0 0 MC ENABLED ((+ (ASH 2 16) 29) :SIGNED-LONGINT)))
  1613.  
  1614. (deftrap _MCISEDITINGENABLED ((MC (:POINTER :COMPONENTINSTANCERECORD)))
  1615.    (:STACK :SIGNED-LONG)
  1616.    (:STACK-TRAP #xA82A :D0 0 MC ((+ (ASH 0 16) 30) :SIGNED-LONGINT)))
  1617.  
  1618. (deftrap _MCCOPY ((MC (:POINTER :COMPONENTINSTANCERECORD)))
  1619.    (:STACK (:POINTER :MOVIERECORD))
  1620.    (:STACK-TRAP #xA82A :D0 0 MC ((+ (ASH 0 16) 31) :SIGNED-LONGINT)))
  1621.  
  1622. (deftrap _MCCUT ((MC (:POINTER :COMPONENTINSTANCERECORD)))
  1623.    (:STACK (:POINTER :MOVIERECORD))
  1624.    (:STACK-TRAP #xA82A :D0 0 MC ((+ (ASH 0 16) 32) :SIGNED-LONGINT)))
  1625.  
  1626. (deftrap _MCPASTE ((MC (:POINTER :COMPONENTINSTANCERECORD)) (SRCMOVIE (:POINTER :MOVIERECORD)))
  1627.    (:STACK :SIGNED-LONG)
  1628.    (:STACK-TRAP #xA82A :D0 0 MC SRCMOVIE ((+ (ASH 4 16) 33) :SIGNED-LONGINT)))
  1629.  
  1630. (deftrap _MCCLEAR ((MC (:POINTER :COMPONENTINSTANCERECORD)))
  1631.    (:STACK :SIGNED-LONG)
  1632.    (:STACK-TRAP #xA82A :D0 0 MC ((+ (ASH 0 16) 34) :SIGNED-LONGINT)))
  1633.  
  1634. (deftrap _MCUNDO ((MC (:POINTER :COMPONENTINSTANCERECORD)))
  1635.    (:STACK :SIGNED-LONG)
  1636.    (:STACK-TRAP #xA82A :D0 0 MC ((+ (ASH 0 16) 35) :SIGNED-LONGINT)))
  1637.  
  1638. ;   menu related stuff  
  1639.  
  1640. (deftrap _MCGETCONTROLLERINFO ((MC (:POINTER :COMPONENTINSTANCERECORD)) (MCINFOFLAGS (:POINTER :SIGNED-LONG)))
  1641.    (:STACK :SIGNED-LONG)
  1642.    (:STACK-TRAP #xA82A :D0 0 MC MCINFOFLAGS ((+ (ASH 4 16) 37) :SIGNED-LONGINT)))
  1643.  
  1644.  
  1645. (deftrap _MCSETCLIP ((MC (:POINTER :COMPONENTINSTANCERECORD)) (THECLIP (:HANDLE :REGION)) (MOVIECLIP (:HANDLE :REGION)))
  1646.    (:STACK :SIGNED-LONG)
  1647.    (:STACK-TRAP #xA82A :D0 0 MC THECLIP MOVIECLIP ((+ (ASH 8 16) 40) :SIGNED-LONGINT)))
  1648.  
  1649. (deftrap _MCGETCLIP ((MC (:POINTER :COMPONENTINSTANCERECORD)) (THECLIP (:POINTER (:HANDLE :REGION))) (MOVIECLIP (:POINTER (:HANDLE :REGION))))
  1650.    (:STACK :SIGNED-LONG)
  1651.    (:STACK-TRAP #xA82A :D0 0 MC THECLIP MOVIECLIP ((+ (ASH 8 16) 41) :SIGNED-LONGINT)))
  1652.  
  1653.  
  1654. (deftrap _MCDRAWBADGE ((MC (:POINTER :COMPONENTINSTANCERECORD)) (MOVIERGN (:HANDLE :REGION)) (BADGERGN (:POINTER (:HANDLE :REGION))))
  1655.    (:STACK :SIGNED-LONG)
  1656.    (:STACK-TRAP #xA82A :D0 0 MC MOVIERGN BADGERGN ((+ (ASH 8 16) 42) :SIGNED-LONGINT)))
  1657.  
  1658. ;  movie controller error codes 
  1659. (defconstant $cannotMoveAttachedController -9999)
  1660. (defconstant $controllerHasFixedHeight -9998)
  1661. (defconstant $cannotSetWidthOfAttachedController -9997)
  1662. (defconstant $controllerBoundsNotExact -9996)
  1663. (defconstant $editingNotAllowed -9995)
  1664. (defconstant $badControllerHeight -9994)
  1665.  
  1666. ;  movie controller routine selectors 
  1667. (defconstant $kMCSetMovieSelect 2)
  1668. (defconstant $kMCRemoveMovieSelect 3)
  1669. (defconstant $kMCIsPlayerEventSelect 7)
  1670. (defconstant $kMCSetActionFilterSelect 8)
  1671. (defconstant $kMCDoActionSelect 9)
  1672. (defconstant $kMCSetControllerAttachedSelect 10)
  1673. (defconstant $kMCIsControllerAttachedSelect 11)
  1674. (defconstant $kMCSetControllerPortSelect 12)
  1675. (defconstant $kMCGetControllerPortSelect 13)
  1676. (defconstant $kMCGetVisibleSelect 14)
  1677. (defconstant $kMCSetVisibleSelect 15)
  1678. (defconstant $kMCGetControllerBoundsRectSelect 16)
  1679. (defconstant $kMCSetControllerBoundsRectSelect 17)
  1680. (defconstant $kMCGetControllerBoundsRgnSelect 18)
  1681. (defconstant $kMCGetWindowRgnSelect 19)
  1682. (defconstant $kMCMovieChangedSelect 20)
  1683. (defconstant $kMCSetDurationSelect 21)
  1684. (defconstant $kMCGetCurrentTimeSelect 22)
  1685. (defconstant $kMCNewAttachedControllerSelect 23)
  1686. (defconstant $kMCDrawSelect 24)
  1687. (defconstant $kMCActivateSelect 25)
  1688. (defconstant $kMCIdleSelect 26)
  1689. (defconstant $kMCKeySelect 27)
  1690. (defconstant $kMCClickSelect 28)
  1691. (defconstant $kMCEnableEditingSelect 29)
  1692. (defconstant $kMCIsEditingEnabledSelect 30)
  1693. (defconstant $kMCCopySelect 31)
  1694. (defconstant $kMCCutSelect 32)
  1695. (defconstant $kMCPasteSelect 33)
  1696. (defconstant $kMCClearSelect 34)
  1697. (defconstant $kMCUndoSelect 35)
  1698. (defconstant $kMCPositionControllerSelect 36)
  1699. (defconstant $kMCGetControllerInfoSelect 37)
  1700. (defconstant $kMCNewControllerFromFileSelect 38)
  1701. (defconstant $kMCSetBadgePictSelect 39)
  1702. (defconstant $kMCSetClipSelect 40)
  1703. (defconstant $kMCGetClipSelect 41)
  1704. (defconstant $kMCDrawBadgeSelect 42)
  1705.  
  1706. ; $ENDC                         ;  UsingMovies 
  1707.  
  1708. ; $IFC NOT UsingIncludes
  1709.  
  1710. ; $ENDC
  1711.  
  1712.  
  1713. (export '($KMCDRAWBADGESELECT $KMCGETCLIPSELECT $KMCSETCLIPSELECT
  1714.           $KMCSETBADGEPICTSELECT $KMCNEWCONTROLLERFROMFILESELECT
  1715.           $KMCGETCONTROLLERINFOSELECT $KMCPOSITIONCONTROLLERSELECT
  1716.           $KMCUNDOSELECT $KMCCLEARSELECT $KMCPASTESELECT $KMCCUTSELECT
  1717.           $KMCCOPYSELECT $KMCISEDITINGENABLEDSELECT $KMCENABLEEDITINGSELECT
  1718.           $KMCCLICKSELECT $KMCKEYSELECT $KMCIDLESELECT $KMCACTIVATESELECT
  1719.           $KMCDRAWSELECT $KMCNEWATTACHEDCONTROLLERSELECT
  1720.           $KMCGETCURRENTTIMESELECT $KMCSETDURATIONSELECT $KMCMOVIECHANGEDSELECT
  1721.           $KMCGETWINDOWRGNSELECT $KMCGETCONTROLLERBOUNDSRGNSELECT
  1722.           $KMCSETCONTROLLERBOUNDSRECTSELECT $KMCGETCONTROLLERBOUNDSRECTSELECT
  1723.           $KMCSETVISIBLESELECT $KMCGETVISIBLESELECT $KMCGETCONTROLLERPORTSELECT
  1724.           $KMCSETCONTROLLERPORTSELECT $KMCISCONTROLLERATTACHEDSELECT
  1725.           $KMCSETCONTROLLERATTACHEDSELECT $KMCDOACTIONSELECT
  1726.           $KMCSETACTIONFILTERSELECT $KMCISPLAYEREVENTSELECT
  1727.           $KMCREMOVEMOVIESELECT $KMCSETMOVIESELECT $BADCONTROLLERHEIGHT
  1728.           $EDITINGNOTALLOWED $CONTROLLERBOUNDSNOTEXACT
  1729.           $CANNOTSETWIDTHOFATTACHEDCONTROLLER $CONTROLLERHASFIXEDHEIGHT
  1730.           $CANNOTMOVEATTACHEDCONTROLLER $MCINFOEDITINGENABLED
  1731.           $MCINFOISINPALINDROME $MCINFOISLOOPING $MCINFOISPLAYING
  1732.           $MCINFOHASSOUND $MCINFOCLEARAVAILABLE $MCINFOPASTEAVAILABLE
  1733.           $MCINFOCOPYAVAILABLE $MCINFOCUTAVAILABLE $MCINFOUNDOAVAILABLE
  1734.           $MCWITHFRAME $MCNOTVISIBLE $MCWITHBADGE $MCSCALEMOVIETOFIT
  1735.           $MCTOPLEFTMOVIE $MCACTIONBADGECLICK $MCACTIONSHOWBALLOON
  1736.           $MCACTIONGETPLAYRATE $MCACTIONGETPLAYEVERYFRAME
  1737.           $MCACTIONSETPLAYEVERYFRAME $MCACTIONGETFLAGS $MCACTIONSETFLAGS
  1738.           $MCACTIONGETUSEBADGE $MCACTIONSETUSEBADGE $MCACTIONGETPLAYSELECTION
  1739.           $MCACTIONSETPLAYSELECTION $MCACTIONGETKEYSENABLED
  1740.           $MCACTIONSETKEYSENABLED $MCACTIONSETPOSTERTIME
  1741.           $MCACTIONSETSELECTIONDURATION $MCACTIONSETSELECTIONBEGIN
  1742.           $MCACTIONCONTROLLERSIZECHANGED $MCACTIONSETGROWBOXBOUNDS
  1743.           $MCACTIONGETLOOPISPALINDROME $MCACTIONSETLOOPISPALINDROME
  1744.           $MCACTIONGETLOOPING $MCACTIONSETLOOPING $MCACTIONSTEP
  1745.           $MCACTIONGETVOLUME $MCACTIONSETVOLUME $MCACTIONGOTOTIME $MCACTIONPLAY
  1746.           $MCACTIONKEY $MCACTIONMOUSEDOWN $MCACTIONDEACTIVATE $MCACTIONACTIVATE
  1747.           $MCACTIONDRAW $MCACTIONIDLE $MOVIECONTROLLERCOMPONENTTYPE
  1748.           $QTCBNEEDSTIMECHANGES $QTCBNEEDSRATECHANGES $CALLBACKATINTERRUPT
  1749.           $CALLBACKATTIMEJUMP $CALLBACKATRATE $CALLBACKATTIME
  1750.           $TIMEBASEAFTERSTOPTIME $TIMEBASEBEFORESTARTTIME $TRIGGERRATECHANGE
  1751.           $TRIGGERRATENOTEQUAL $TRIGGERRATEGTE $TRIGGERRATELTE
  1752.           $TRIGGERRATEEQUAL $TRIGGERRATEGT $TRIGGERRATELT $TRIGGERTIMEEITHER
  1753.           $TRIGGERTIMEBWD $TRIGGERTIMEFWD $LOOPTIMEBASE $FEATUREUNSUPPORTED
  1754.           $COULDNOTUSEANEXISTINGSAMPLE $NODEFAULTDATAREF $BADDATAREFINDEX
  1755.           $INVALIDDATAREFCONTAINER $NOMOVIEFOUND $DATANODATAREF
  1756.           $ENDOFDATAREACHED $DATAALREADYCLOSED $DATAALREADYOPENFORWRITE
  1757.           $DATANOTOPENFORWRITE $DATANOTOPENFORREAD $INVALIDSAMPLEDESCRIPTION
  1758.           $INVALIDCHUNKCACHE $INVALIDSAMPLEDESCINDEX $INVALIDCHUNKNUM
  1759.           $INVALIDSAMPLENUM $INVALIDRECT $CANTENABLETRACK
  1760.           $INTERNALQUICKTIMEERROR $BADEDITINDEX $TIMENOTINMEDIA $TIMENOTINTRACK
  1761.           $TRACKNOTINMOVIE $TRACKIDNOTFOUND $BADTRACKINDEX
  1762.           $MAXSIZETOGROWTOOSMALL $USERDATAITEMNOTFOUND $STALEEDITSTATE
  1763.           $NONMATCHINGEDITSTATE $INVALIDEDITSTATE $CANTCREATESINGLEFORKFILE
  1764.           $WFFILENOTFOUND $MOVIETOOLBOXUNITIALIZED $PROGRESSPROCABORTED
  1765.           $MEDIATYPESDONTMATCH $BADEDITLIST $CANTPUTPUBLICMOVIEATOM
  1766.           $INVALIDTIME $INVALIDDURATION $INVALIDHANDLER $INVALIDDATAREF
  1767.           $INVALIDSAMPLETABLE $INVALIDMOVIE $INVALIDTRACK $INVALIDMEDIA
  1768.           $NODATAHANDLER $NOMEDIAHANDLER $BADCOMPONENTTYPE $CANTOPENHANDLER
  1769.           $CANTFINDHANDLER $BADPUBLICMOVIEATOM $BADIMAGEDESCRIPTION
  1770.           $COULDNOTRESOLVEDATAREF $MOVIEINDATAFORKRESID $DATAREFWASNOTRESOLVED
  1771.           $DATAREFSELFREFERENCE $HINTSSCRUBMODE $MOVIESCRAPONLYPUTMOVIE
  1772.           $MOVIESCRAPDONTZEROSCRAP $FLATTENDONTINTERLEAVEFLATTEN
  1773.           $FLATTENACTIVETRACKSONLY $FLATTENADDMOVIETODATAFORK
  1774.           $CREATEMOVIEFILEDONTOPENFILE $CREATEMOVIEFILEDONTCREATEMOVIE
  1775.           $CREATEMOVIEFILEDELETECURFILE $NEXTTIMEIGNOREACTIVESEGMENT
  1776.           $NEXTTIMEEDGEOK $NEXTTIMESYNCSAMPLE $NEXTTIMETRACKEDIT
  1777.           $NEXTTIMEMEDIAEDIT $NEXTTIMEMEDIASAMPLE $MEDIASAMPLENOTSYNC
  1778.           $TRACKUSAGEINPOSTER $TRACKUSAGEINPREVIEW $TRACKUSAGEINMOVIE
  1779.           $NEWMOVIEDONTASKUNRESOLVEDDATAREFS $NEWMOVIEDONTRESOLVEDATAREFS
  1780.           $NEWMOVIEACTIVE $MEDIAQUALITYBEST $MEDIAQUALITYBETTER
  1781.           $MEDIAQUALITYNORMAL $MEDIAQUALITYDRAFT $PROGRESSOPLOADMEDIAINTORAM
  1782.           $PROGRESSOPLOADTRACKINTORAM $PROGRESSOPLOADMOVIEINTORAM
  1783.           $PROGRESSOPCUT $PROGRESSOPCOPY $PROGRESSOPADDMOVIESELECTION
  1784.           $PROGRESSOPPASTE $PROGRESSOPINSERTMOVIESEGMENT
  1785.           $PROGRESSOPINSERTTRACKSEGMENT $PROGRESSOPFLATTEN $MOVIEPROGRESSCLOSE
  1786.           $MOVIEPROGRESSUPDATEPERCENT $MOVIEPROGRESSOPEN $KNOVOLUME
  1787.           $KFULLVOLUME $DOTHERIGHTTHING $SOUNDMEDIATYPE $VIDEOMEDIATYPE
  1788.           $MOVIEFILETYPE $GESTALTQUICKTIME))
  1789. (provide-interface 'Movies)